faire un tri alterné avec soi les nombres plus petits et plus grand ou les couleurs de cellule

cedrois 

Ce texte a été traduit par un logiciel, l'auteur du texte ne parle pas cette langue.

Avec la mise en forme conditionnelle, une formule fonctionnerait également ici :

= MOD (ROW () - 1,1 * 2) +1 <= 1

en français je pense que ce serait :

= MOD (LIGNE () - 1; 1 * 2) +1 <= 1

ou aussi avec VBA :

Sub Marquer_des_lignes()
    'ActiveSheet.Unprotect ("")
    Dim rng As Range
    Dim iStart As Integer, iIntervall As Integer
    Dim iCount As Integer, iCounter As Integer

    Rows("5:5").Interior.Pattern = xlNone

    iStart = 6
    iIntervall = 2
    iCount = 500
   
    Set rng = Rows(iStart)
    For iCounter = iStart To iStart + iCount + iIntervall - 1 Step iIntervall
        Set rng = Union(rng, Rows(iCounter))
    Next iCounter
   
    rng.Interior.ColorIndex = 6
    Set rng = Nothing
 
    'ActiveSheet.Protect ("")
End Sub

Vous pouvez adapter le code VBA à vos besoins

* Fichier d'exemple joint avec les deux options.

Je serais heureux de savoir si je pouvais aider.

NikolinoDE

Je sais que je ne sais rien (Socrate)

La réponse a-t-elle été utile ? Marquez-les comme utiles !

Cela aidera tous les participants au forum.