Binou3719
Messages postés2Date d'inscriptionmercredi 24 août 2005StatutMembreDernière intervention25 août 2005
-
24 août 2005 à 13:42
Binou3719
Messages postés2Date d'inscriptionmercredi 24 août 2005StatutMembreDernière intervention25 août 2005
-
25 août 2005 à 08:04
J'ai un petit problèm. J'utilise find pour trouvé des cellule dans ma feuille mais s'il n'y a pas de cellule correspondant à la recherche je n'arrive pas à gérer l'erreur.
Merci d'avance
cs_wape
Messages postés262Date d'inscriptionsamedi 21 décembre 2002StatutMembreDernière intervention19 décembre 201012 24 août 2005 à 13:53
Bonjour,
Essaye qqch du genre :
Dim MaCellule As Range
Set MaCellule = Worksheets("MaFeuille").Range("A:A").Find("MaValeur")
If MaCellule Is Nothing Then
MsgBox "Valeur pas trouvée !"
Else
MsgBox "Valeur trouvée en ligne " & MaCellule.Row
End If