Range avec Variable
Bonjour a tous j'ai ce code
If test < 10 Then
Worksheets("Performances").Cells(ligne, 20).Interior.Color = RGB(255, 50, 50)Worksheets("Performances").Cells(ligne, 22).Interior.Color = RGB(255, 50, 50)Worksheets("Performances").Cells(ligne, 23).Interior.Color = RGB(255, 50, 50)ElseJ'aimerais faire un range mais ça marche pas , j'ai essayé ça mais sans succès
Dim cm As Range, cx As Range
Set cm = Cells(ligne, 1)
Set cx = Cells(ligne, 23)
If test < 10 Then
Worksheets("Performances").range("cm:cx").Interior.Color = RGB(255, 50, 50)
else
J'ai pas mal cherché mais je trouve pas de réponse , je pense que je fais une erreur dans l'ecriture
si quelqu'un a une réponse
Merci
Naë
bonjour,
essaie ainsi
Dim cm As Range
With Sheets("performances")
Set cm = .Range(.Cells(ligne, 1), .Cells(ligne, 23))
If test < 10 Then
cm.Interior.Color = RGB(255, 50, 50)
Else
End With