Discussion :

[jmde]

Bonjour,

Je n'arrive pas à trouver la syntaxe exacte de cette ligne.

Code :

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

rs.FindFirst "[Imprimé] = True" And "[N°Remise] <> 0"

Pouvez-vous m'aider ?

Salutations

[tee_grandbois]

Bonjour,
la syntaxe est correcte.
As-tu un message d'erreur ?
Peux-tu nous montrer ton code complet ?

[philben]

salut,

la syntaxe est correcte.

le' And' ne devrait-il pas être dans la chaîne ?

Philippe

[tee_grandbois]

Oui ...

[jmde]

Bonsoir,

Merci pour vos réponses.

Oh, c'est un code tout simple.

L'erreur est:
Erreur 13 Incompatiblité de type

Code :

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

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

le' And' ne devrait-il pas être dans la chaîne ?

Est-ce que ce serait cette écriture:

Code :

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

rs.FindFirst "[Imprimé] = True" & " And [N°Remise] <> 0"

Salutations

[philben]

Ben, des fois l'évidence ne saute pas aux yeux...

J'en profite pour remercier 'tee_grandbois' qui apporte sur le forum des réponses pertinentes, précises et justes

Philippe

[philben]

la solution évoquée :

Code :

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

1
2
rs.FindFirst "[Imprimé] = True And [N°Remise] <> 0"

Philippe