VBA IF et AND

Bonsoir,

Je ne sais pas pk, VBA bloque quand j'écris :

Code:

---

1 2 3 4 5 6 7

If NCcab = True Then NCcab = "Toto" ElseIf NCcabSticker = True Then NCcabSticker = "Bob" ElseIf NCcab = False And NCcabSticker = False Then NCcab = "" And NCcabSticker = "" End If

---

Cela me mets "incompatibilité de type" au niveau de NCcab = "" And ...... Vous savez pk ?

Merci d'avance,


Vince

Je précise que les variables sont bien définies en String.

Bonjour,
Il faut l'écrire sur deux lignes :

Code:

---

1 2 3 4 5 6 7 8

If NCcab = True Then NCcab = "Toto" ElseIf NCcabSticker = True Then NCcabSticker = "Bob" ElseIf NCcab = False And NCcabSticker = False Then NCcab = "" NCcabSticker = "" End If

---

Remarque : NCcab et NCcabSticker doivent être de type Variant (type par défaut)

@+

Enfait j'ai réussi en mettant la deuxième parti à la ligne et en supprimant le "AND".

Merci pour ta réponse Gord.

Pourquoi il faut mieux mettre en Variant ?

Tu fais un test

Code:

---

... NCcab = True

---

de type Booléen
puis

Code:

---

... NCcab = "Toto"

---

de type String

Il faut donc un type Variant si tu ne veux pas d'erreur.
@+

D'accord.

Merci pour ta réponse et ta rapidité.

De rien
@+