Une Macro applicable dans plusieurs feuilles

Bonjour

J'ai un classeur avec les 12 mois, j'ai besoin de remettre en ordre les dates sur ces 12 feuilles, Si possible toutes à la fois ou sinon feuille par feuille, J'ai fait bêtement ma macro sur la feuille Janvier.

Je n'ai pas de connaissance en VBA,

j'ai constaté que l'adresse de la feuille "Janvier" apparaissait dans le code, il et dons logique que la macro ne s'applique que sur cette feuille.

J'imagine qu'il faut mettre une variable pour remplacer "Janvier"

J 'ai trouver quelques codes à intégrer dans ma macro, je ne sais où les placer et comment la modifier

Merci pour vos réponses

La solution facile, mais qui manquerait d'élégance serait bien sur de faire une macro par mois

Cordialement

16essais-allege.xlsm (153.07 Ko)

Bonjour,

Ton fichier en retour

A+

30essais-allege-1.xlsm (136.98 Ko)

Bonjour,

Tu donnes à tes boutons le nom de la feuille où chacun est (je ne l'ai fait que jusqu'en mars, à faire pour la suite).

Tu affectes à chacun ta macro 1 :

Sub Macro1()
    Dim ws$, n%
    ws = Application.Caller
    With Worksheets(ws)
        n = .Cells(.Rows.Count, 1).End(xlUp).Row
        With .Range("A5:G" & n)
            .Sort key1:=.Range("F5"), order1:=xlAscending, Header:=xlNo
        End With
    End With
End Sub

Cordialement.

Bonjour

Merci pour votre réponse, Ça marche , je vais essayer de comprendre la modif

Cordialement

Rechercher des sujets similaires à "macro applicable feuilles"