Discussion :

[skillipo]

Bonjour;

j'ai une erreur sur ma requete voici mon code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
 Else
        MsgBox "mutli"
             If TabTempo![e-mail Consolidation] <> Empty Then
             Dim TabTempoConsolidation As DAO.Recordset, TabID As DAO.Recordset, listLegalEntities As Variant
             
             'MsgBox
             Set TabTempoConsolidation = Mba.OpenRecordset("SELECT DISTINCT [Consolidation Req].[legal entity] FROM [Consolidation Req] WHERE [Consolidation Req].[Product name Consolidation]= '" & TabTempo![Product name] & "' And [Consolidation Req].[e-mail Consolidation]= '" & TabTempo![e-mail] & "' AND [Consolidation Req].[Email Status]= False ") 'GROUP BY [Consolidation Req].[legal entity]
             
             
             
             Set TabID = Mba.OpenRecordset("SELECT [Reach Contacts].Name, [Reach Contacts].Address, [Reach Contacts].City, [Reach Contacts].Email From [Reach Contacts], '" & TabTempoConsolidation & "'WHERE [Reach Contacts].[Name]=[TabTempoConsolidation].[legal entity]")
             
             listLegalEntities = TabID.GetRows ' put all the iformation in a table
        End If

Voici ma requete ; j'ai une erreur au niveau de SET TabID ,j'essaye de faire une erreur avec une jointure entre une des tables temporaires et une table dans ma base .

Merci de votre aide

[DMboup]

TabTempoConsolidation n'est pas une table temporaire mais bien un recordset. Tu ne peux pas l'utiliser comme tu le fais dans ton second recordset.

Pourquoi n'essaie tu pas de faire une requête sur les tables [Consolidation Req] et [Reach Contacts] puisque apparamment se sont les deux à lier?

[Mat.M]

Voici ma requete ; j'ai une erreur au niveau de SET TabID ,j'essaye de faire une erreur avec une jointure entre une des tables temporaires et une table dans ma base .

Merci de votre aide

Et JOIN LEFT/RIGHT ça sert à quoi ?
Y'a des bons tutos sur SQL
Un truc tout simple: utiliser le générateur de requêtes SQL il fera cela tout seul...
Et faire une jointure dans la requête SQL directement cela sera plus rapide que d'utiliser des recordsets conjointement.

[skillipo]

MERCI BEAUCOUP , a force de m'acharner sur ce truc j'ai pa avancé .

ma question c'est : le resultat de la requete est ce que je le le mettre dans un TAbleau que je colle sur EXCEL .

Exemple :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
 
Dim listLegalEntities As Variant
 
Set TabID = Mba.OpenRecordset(" SELECT .........") 
listLegalEntities = TabID.GetRows ' put all the iformation in a table

MERCI

[Jean-Philippe André]

salut, pour coller le résultat d'une requete dans exceltu peux utiliser CopyFromRecordSet directement

[skillipo]

bonjour

voici ma requete

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
 
 
 Set TabTempoConsolidation = Mba.OpenRecordset("SELECT Name, Address, City, Email FROM [Reach Contacts] WHERE Name IN (SELECT DISTINCT [legal entity] FROM [Consolidation Req] WHERE [Consolidation Req].[Product name Consolidation]= '" & TabTempo![Product name] & "' And [Consolidation Req].[e-mail Consolidation]= '" & TabTempo![e-mail] & "' AND [Consolidation Req].[Email Status]= False ")

j'ai une erreur Dessus .

MERCI

[skillipo]

pour la requete j'avais oublié une parenthése ca marche aparement , je vais essayer de la coller directement de mon recordset et je vous tiens au courant

MERCI