[vba] valeur nulle pour une variable

ekynoxx Messages postés 4 Date d'inscription   Statut Membre Dernière intervention   -  
 masterseb -
Bonjour a tous,

j'ai un soucis je crois assez classique.
Je cherche dans une colonne la premiere cellule contenant la chaine de caractere "6J".
J'utilise la propriete Find.
Mon probleme est que si je nai pas de valeur, la macro plante.

Voici mon code :

Sub TestCell()

Dim FirstRow6J As Variant

FirstRow6J = Columns("W:W").Find("6J", Range("W2"), , , xlByRows, xlNext).Row
Range("A1").Value = FirstRow6J

End Sub

Je n'arrive pas a gere le cas ou dans la colonne W je nai pas de cellule avec pour valeur 6J.
Merci de votre aide.

1 réponse

masterseb
 
Salut,

après la déclaration de ta variable Firstrow6J, ajoute la petite phrase suivante qui va empêcher les erreurs de provoquer le plantage :

On Error Resume Next

a+
0