Lancement macro en fonction du jour

Bonsoir le forum,

Je viens vers vous pour savoir si il est possible de lancer une macro en fonction du jour de la semaine.

Par exemple, dans le fichier test, je voudrai lancer la macro via le bouton uniquement si nous sommes Lundi.

Est-ce faisable ?

Merci d'avance pour vos lumières.

Cdlt

Peka

Bonjour,

Un exemple à adapter.

Cdlt.

Sub Macro_test()
    Select Case Weekday(Date, 2)
        Case 1
            '1 = lundi, mardi=2, etc...
            Worksheets("Feuil1").Cells(1).CurrentRegion.Clear
            With ActiveSheet
                Cells(1).CurrentRegion.Copy Worksheets("Feuil1").Cells(1)
            End With
        Case Else
            MsgBox "La procédure est programmée pour être exécutée le lundi."
    End Select
    Worksheets("Feuil1").Range("A1:C1").EntireColumn.AutoFit
End Sub

Merci bcp

C'est tout à fait ce que je cherchais.

Bonne soirée

Peka