Problème avec if et then
Bonjour. J'ai une cellule (c22). Si cette cellule = A, B ou C, qui sont des valeurs texte, je veux que les cellules dans les lignes 33 à 35 = X (la valeur doit être X)
Je veux que cette macro s'applique sur les collones C à H donc 3 à 8
J'ai le code suivant
'*******************************************************************
Dim h As Byte
Dim i As Byte
For i = 33 To 35 ' définition des lignes
For h = 3 To 8 ' définiton de la collonne
If (Cells(h, 22)) = "FD-Vessie 1po" Then Cells(i, h) = "X"
Next h
Next i
'**********************************************************
Ca ne fonctionne pas :(
Merci
Salut la_baie,
Ça ne fonctionne pas car tu as mis Cells(h, 22) dans ta condition au lieu de Cells(22, 3).
Voici un autre essai :
If Range("C22").value = "FD-Vessie 1po" Then
Range("C33:H35").value = "X"
end ifÇa permettrait de se délester d'une boucle