Colorier une ligne en VBA

Sikora -  
m@rina Messages postés 27623 Date d'inscription   Statut Modérateur Dernière intervention   -
Bonjour à tous,

Je cherche à colorier des lignes comprises entre deux lignes connues AA et derligne. Mais bizarrement même si excel connait le numéro des lignes derligne et AA (utilisées auparavant avec succès) il refuse de fonctionner pour ce code que j'ai trouvé sur internet. Est-ce normal ?

For i = derligne To AA
Workbooks("AA.xls").Sheets("Feuil1").Range(Cells(i, 1), Cells(i, 17)).Interior.ColorIndex = 3
Next i

2 réponses

  1. pijaku Messages postés 13513 Date d'inscription   Statut Modérateur Dernière intervention   2 773
     
    Salut,
    Etrange...
    Tes lignes derligne et AA sont bien déclarées?
    Dim derligne, AA As Integer

    Est ce que derligne est bien inférieure à AA?
    Essaye ceci, cela fonctionne bien :
    Dim derligne, AA As Integer
    derligne = 3
    AA = 18
    Sheets("Feuil1").Range(Cells(derligne, 1), Cells(AA, 17)).Interior.ColorIndex = 3
    0
  2. m@rina Messages postés 27623 Date d'inscription   Statut Modérateur Dernière intervention   11 563
     
    Bonjour,

    Il faut effectivement que A soit inférieur à derligne.
    Dans le cas contraire, on peut mettre :

    for i = derligne to AA step -1


    m@rina
    0