Si cellule contient texte alors VBA

Fermé
loicen73 Messages postés 32 Date d'inscription mardi 27 mars 2018 Statut Membre Dernière intervention 16 avril 2018 - 30 mars 2018 à 08:25
baladur13 Messages postés 46382 Date d'inscription mercredi 11 avril 2007 Statut Modérateur Dernière intervention 18 avril 2024 - 30 mars 2018 à 11:13
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 46382 Date d'inscription mercredi 11 avril 2007 Statut Modérateur Dernière intervention 18 avril 2024 13 212
30 mars 2018 à 11:13
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