Bonjour,
Je n'arrive pas à trouver la syntaxe exacte de cette ligne.
Pouvez-vous m'aider ?Code:rs.FindFirst "[Imprimé] = True" And "[N°Remise] <> 0"
Salutations
Version imprimable
Bonjour,
Je n'arrive pas à trouver la syntaxe exacte de cette ligne.
Pouvez-vous m'aider ?Code:rs.FindFirst "[Imprimé] = True" And "[N°Remise] <> 0"
Salutations
Bonjour,
la syntaxe est correcte.
As-tu un message d'erreur ?
Peux-tu nous montrer ton code complet ?
salut,
le' And' ne devrait-il pas être dans la chaîne ?Citation:
la syntaxe est correcte.
Philippe
Oui ...:oops:
Bonsoir,
Merci pour vos réponses.
Oh, c'est un code tout simple.
L'erreur est:
Erreur 13 Incompatiblité de type
Code:
1
2
3
4
5
6
7
8
9
10 Set db = CurrentDb Set rs = db.OpenRecordset(strsql, dbOpenDynaset) rs.FindFirst "[Imprimé] = True" And "[N°Remise] <> 0" If rs.NoMatch Then MsgBox "Vous devez Selectioner l'Enregistrement" Me.OptCréerRemise = 0 Exit Sub End If
Est-ce que ce serait cette écriture:Citation:
le' And' ne devrait-il pas être dans la chaîne ?
SalutationsCode:rs.FindFirst "[Imprimé] = True" & " And [N°Remise] <> 0"
Ben, des fois l'évidence ne saute pas aux yeux...:aie:
J'en profite pour remercier 'tee_grandbois' qui apporte sur le forum des réponses pertinentes, précises et justes :ccool:
Philippe
la solution évoquée :
PhilippeCode:
1
2 rs.FindFirst "[Imprimé] = True And [N°Remise] <> 0"