VBA condition valeur cellule <> nom de la feuille

[Adc]

Bonjour le forum,

Je cherche à mettre une condition dans une macro du type : si la valeur de la cellule C1 est différente du nom de la feuille alors sortir du Forn mais ça ne marche pas

Voici mon code

If ActiveSheet.Range("C1").Value <> ActiveSheet.Name Then
Exit For
End If

En sachant que les noms des feuilles sont des nombres (60632, 60633 par exemple) en format standard.

Est-ce que qulqu'un saurait d'où vient le problème ?

Auré.

 

[Pierrot93]

Re : VBA condition valeur cellule <> nom de la feuille

Bonjour,

"sortir du Forn " signifie quoi... "Exit For" permet de sortir d'une boucle.... pour sortir d'une procédure utiliser "Exit Sub"....

bonne journée
@+

 

[Adc]

Re : VBA condition valeur cellule <> nom de la feuille

Bonjour,

Mes doigts ont ripé, sortir du For signifiait bien sortir de la boucle For

Auré

 

[Pierrot93]

Re : VBA condition valeur cellule <> nom de la feuille

Re,
peut être ainsi alors :

If CStr(ActiveSheet.Range("C1").Value) <> ActiveSheet.Name Then

@+

 

[Adc]

Re : VBA condition valeur cellule <> nom de la feuille

Ca fonctionne, merci beaucoup.

Pour info, que signifie "CStr" ?

 

[Pierrot93]

Re : VBA condition valeur cellule <> nom de la feuille

Re,

"cstr" renvoie la valeur de ta cellule convertie en type de donnée "string", soit du texte...

 

[Adc]

Re : VBA condition valeur cellule <> nom de la feuille

Ok, merci.