Discussion :

[lucyole]

Bonjour a tous !

tout d'abord , je voudras preciser que je suis debutante en VBA !

Dans un formulaire , j'ai crée un zone de texte qui permet a l'utilisateur de saisir le nom rechercher

le code de cette fonction est la suivante :
**********************************
Dim oRst As DAO.Recordset
Dim oDb As DAO.Database

'instancier la base
Set oDb = CurrentDb

Set oRst = oDb.OpenRecordset("SELECT * FROM ORGANISATEUR WHERE NUMORGANISATEUR=2", dbOpenDynaset)

'Tant que non fin du recordset
While Not oRecordset.EOF
'Passer au suivant
oRecordset.MoveNext
Wend

'si existe
If Me.Recordset.NoMatch Then
MsgBox "Aucun enregistrement n'a été trouvé"
Else
MsgBox " A TABLE "
End If
******************************

Or access me renvoit une erreur :
= >Objet non requis

Merci de m'aider !!!!
@ :

[Faw]

Salut, je dirais plutôt que l'objet est requis.
oRecordset.MoveNext
essaye avec

Code :

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

oRst.movenext

remplace tous les oRecordset par oRst

[lucyole]

merci beaucoup