Si cellule contient texte alors VBA

loicen73 Messages postés 32 Date d'inscription   Statut Membre Dernière intervention   -  
baladur13 Messages postés 47722 Date d'inscription   Statut Modérateur Dernière intervention   -
Bonjour à tous,

J'ai un message d'erreur 9 sur la ligne "If" lorsque j'exécute cette macro


Sub test1()

If Workbooks("Test boucles pour tronçons.xlsx").Sheets("ECS").Cells(11, 5) Like "*" Then
Workbooks("Test boucles pour tronçons.xlsx").Sheets("Bouclage").Range("B27") = Workbooks("Test boucles pour tronçons.xlsx").Sheets("Bouclage").Cells(11, 5)

Else
MsgBox "Renseigner tronçon"

End if

End


Merci de m'éclaircir car je n'arrive pas à trouver l'erreur...

1 réponse

baladur13 Messages postés 47722 Date d'inscription   Statut Modérateur Dernière intervention   13 676
 
Bonjour
Puisque vous dites dans une alerte avoir résolu le problème par vous-même, il serait gentil de votre part de nous donner la solution.
Cette dernière pouvant, qui sait, servir à d'autres internautes confrontés à ce type de problème.
Merci d'avance pour eux.
0