Incompatibilité de type

Bonjour,

Je bloque sur une erreur toute simple, mais ne comprends pas mon erreur .. En effet, lorsque j'éxecute mon code, j'ai une erreur d'incompatibilité de type.

For i = 4 To 20

For x = 7 To 55

If Worksheets(4).Cells(x, i).Value = "VRAI" Then
....

L'erreur apparait sur cette 3ème ligne. Il semble que le problème vienne de la colonne "i", mais je ne comprends pourquoi. Lorsque je demande de lire la valeur, la valeur est bien affiché (Msgbox Worksheets(4).Cells(x, i) ).

Dès que je remplace mon i par un chiffre, le code tourne sans problème.

Merci d'avance pour votre aide ! :)

Bonjour,

Déclarez I comme Integer en début de procédure.

Dim I as Integer

Bonjour,

J'ai déjà essayé, ça ne fonctionne pas, le message d'erreur reste le même ..

Avez-vous la possibilité de mettre en ligne votre fichier sans données confidentielles ?

Bonjour,

Si le "Vrai" de votre cellule est un "vrai " logique vous pouvez essayer

If Worksheets(4).Cells(x, i).Value = True Then

cdlt

Rechercher des sujets similaires à "incompatibilite type"