ERREUR 13 : incompatibilité / VBA
Résolu
arsene2222
Messages postés
5
Statut
Membre
-
yg_be Messages postés 23437 Date d'inscription Statut Contributeur Dernière intervention -
yg_be Messages postés 23437 Date d'inscription Statut Contributeur Dernière intervention -
Bonjour,
je suis nouveau sur le forum, et novice dans vba.
J'essaie de mettre en place une macro le but est de vérfier les données de la colonne A et de les remplacer par : Bon environnement / Mauvais environnement :
Sub regle()
Dim cell as range
For each cell in columns("A")
If cell.value="304035" Then
cell.value="bon environnement"
Elseif cell.value="305678" Then
Cell.value="mauvais environnement"
End if
End if
Next
End sub
Mais j'ai un message d'erreur : erreur d'exécution 13 : Incompatibilité type
Merci infiniment pour votre aide et conseil.
je suis nouveau sur le forum, et novice dans vba.
J'essaie de mettre en place une macro le but est de vérfier les données de la colonne A et de les remplacer par : Bon environnement / Mauvais environnement :
Sub regle()
Dim cell as range
For each cell in columns("A")
If cell.value="304035" Then
cell.value="bon environnement"
Elseif cell.value="305678" Then
Cell.value="mauvais environnement"
End if
End if
Next
End sub
Mais j'ai un message d'erreur : erreur d'exécution 13 : Incompatibilité type
Merci infiniment pour votre aide et conseil.