Bonjour tout le monde,

Lorsque je compile mon code, il apparait une erreur d'execution 13 : incompatibilité de type. Je pense savoir d’où vient l'erreur mais je ne trouve pas de solution.

Je parcoure un tableau (table(0,j) ou j varie de 0 à 55) et à l'aide d'une boucle if, j'effectue 2 procédures différentes en fonction d'une condition. Je précise que table fonctionne très bien, l'erreur ne vient pas de sa création ou de son remplissage !

Voila le code :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
For j = 0 to 55
If table(0, j) = "INSTITUCION" Or "HAP ASOCIADA" Or "PC6M BASAL FECHA" then
'code1
Else
'code2
End If
Next j
Mon programme bug pour j = 20 car alors table(0, j) = "DOSIS (mg c/12 hrs)" ! Je pense tout simplement que l'erreur est du à la présence de caractères spéciaux mais je ne comprends pas pourquoi car les éléments de table n'ont pas été déclaré avec un type spécifique, autrement dit ce sont tous des variants et ils devraient alors accepter les caractères spéciaux non ?

Par ailleurs, voila la ligne surligné en jaune par excel :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
If table(0, j) = "INSTITUCION" Or "HAP ASOCIADA" Or "PC6M BASAL FECHA" then
Je vous remercie d'avance pour vos remarques ou solutions car je ne vois vraiment pas ce que je peux faire.