Discussion :

[NicoMon]

Bonjour;

J'essaie de faire une requête en VBA du type :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
requete = "ID_ACTION = '" & Me!lst_action & "' " & _
"and EXISTENCE= '" & Me!lst_existence & "' " & _
"and ANCIENNETE= '" & Me!lst_anciennete & "' " & _
"and APPLICATION= '" & Me!lst_application & "' " & _
"and ZONE_CLIM= '" & Me!lst_zone_clim & "' " & _
"and PERFORMANCE= '" & Me!lst_performance & "' " & _
"and SURF_PIECE= '" & Me!lst_surf_piece & "' " & _
"and ENERGIE= '" & Me!lst_energie & "' " & _
"and SECT_ACTIVITE= '" & Me!lst_sect_activite & "' " & _
"and USAGE= '" & Me!lst_usage & "' " & _
"and TYPE_EQUIP= '" & Me!lst_type_equip & "' " & _
"and MODE_SITE= '" & Me!lst_mode_site & "'"
coeff_c = DLookup("[COEFF_C]", "TAB CRITERE", requete)

Malheureusement, elle semble trop longue (> 256 caractères) et elle est tronquée. J'ai essayé avec DLookup, un recordset :

Code :

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

1
2
3
4
5
6
7
8
Dim cn As ADODB.Connection
Dim rst As New ADODB.Recordset
Dim requete As String
 
requete = "blah blah blah ...."
 
Set cn = CurrentProject.Connection
Set rst = cn.Execute(requete)

et même avec runsql mais je sais pas comment récupérer le résultat et il semblerait que cela ne fonctionne pas avec un select.

J'ai épuisé mes faibles connaissances en access et VBA. Quelqu'un aurait-il une solution ?

Merci d'avance

[electrosat03]

Salut,

Pourquoi ne pas faire plusieurs requête.
Une première qui trie déjà un certains nbre de record, ensuite une deuxième basée sur la première qui trie celle-ci, etc, etc...

A+

[Pierre Fauconnier]

Salut.

Je pense, mais cela demande vérification, qu'une requete sql doit avoir une longueur maximale de 1024 caractères.

Ok?

[marot_r]

Oui, il y a une limite à la longueur d'une requête mais là c'est bizar que cela coupe à 256.

Les chaînes d'access acceptent environ 32000 cars et DLookup attent une string donc cela ne devrait pas couper.

Fait afficher (debug.print len(requete)) pour vérifier la longueur de ta chaîne de critère et vérifie ce qui se passe quand tu as des nulls dans tes champs.

[NicoMon]

Bonjour;

Il y avait effectivement un problème avec les Null. Dlookup marche une fois que je gère les colonnes à Null (comme je les connais, je ne les intègre pas dans la requête).
J'ai tellement essayé de solutions que j'ai du mélanger les erreurs. D'autres accès, en gérant les Null, ne fonctionnant pas.

Enfin bref, Dlookup m'ira très bien.

Merci à tous.