VBA : 2 conditions if and if

[bertrand1202]

Bonjour

Je recherche comment fonctionne une doule condition en Macro


j'ai défini
:

For each Vcellule in Range ("a:b65536).end(xlUp)

If Vcellule(i,1) ="a"and Vcellule(i,2)="b" then

ça ne fonctione pas , est ce possible de faire cela ?

Merci

 

[gwenlorin]

Re : VBA : 2 conditions if and if

Re,

ton code n'est pas cohérent.
pb sur For each Vcellule in Range ("a:b65536).end(xlUp). La définition du range est incomplète à mon sens

Reprends ce que tu avais mis dans ton autre message :
For Each Vcellule In Range("a1:a" & Range("A65536").End(xlUp).Row)

Cette définition faite tu n'a pas besoin de rajouter des coordonnées pour accèder à Vcellule :
If Vcellule(i,1) ="a"and Vcellule(i,2)="b" then

à remplacer par If Vcellule.value ="a"and Vcellule.value="b" then

Après je pense qu'il faut mettre OR et non AND dans ta condition car il parait difficile qu'une cellule prenne ces 2 valeurs en même temps.

 

[job75]

Re : VBA : 2 conditions if and if

Bonjour bertrand1202, gwenlorin,

annulé, j'avais mal lu...
A+

 

[bertrand1202]

Re : VBA : 2 conditions if and if

Rebonjour

Ok, c'est bien le.value qui manquait
Parfois les cellules fonctionnent sans .value , désormais , je prend pour règle de toujours définir par .value pour éviter les problèmes.
Quant à Range("a4:a65536").end ... apparemment ça ne gêne pas pour rechercher dans une autre colonne. Je retiens.
Merci encore , je vais pouvoir colorier mes Lapins