Signaler

Vba excel fonction find [Résolu]

Posez votre question xicamaria 8Messages postés mardi 18 juillet 2017Date d'inscription 14 octobre 2017 Dernière intervention - Dernière réponse le 28 sept. 2017 à 21:40 par yg_be
Bonjour,

Dans la ligne 1 de la feuile 1 j'ai mis de dates de la colonne "A3 à la colonne "H".
J'essaie de voir si la date 01/12/2016 s'y trouve avec la macro ci-dessous.
Mais j'ai l'erreur 91 : erreur Variabe objet ou variable with not definie.
Merci de votre réponse !

Code :

Sub yyy()

Dim jour As Date
Dim trouve As Range

jour = DateSerial(2016, 12, 1)
trouve = Sheets("Feuil1").Range("A1:H1").Cells.Find(what:=jour, LookAt:=xlWhole)
If trouve Is Nothing Then
MsgBox "trouve is nothing"
Else
MsgBox "trouvé !"
End If

End Sub
Utile
+0
plus moins
Bonjour

Set trouve = Sheets("Feuil1").Range("A1:H1").Cells.Find(what:=jour, LookAt:=xlWhole) 


K
Donnez votre avis
Utile
+0
plus moins
merci bcp kalissi, en effet j'oublie tjs le SET !!!!!!!
yg_be 3576Messages postés lundi 9 juin 2008Date d'inscription ContributeurStatut 19 octobre 2017 Dernière intervention - 28 sept. 2017 à 21:40
bonsoir, peux-tu alors marquer ce sujet comme résolu?
Répondre
Donnez votre avis

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes.

Le fait d'être membre vous permet d'avoir des options supplémentaires.

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !