Déclencher macro suivant le jour

[isa44]

Bonjour ,
en A j'ai la date d'aujourd'hui avec le format jjjj/jj/mm/aa

Je voudrais appeler la macro1 si le jour en A1 est soit lundi , soit mardi , soit mercredi , soit jeudi ,soit vendredi.

La macro2 si A1 est égal à samedi et la macro3 si A1 est égal à dimanche.

Merci

 

[Pierrot93]

Re : Déclencher macro suivant le jour

Bonjour Isa

essaye peut être ainsi :

Sub test()
If Weekday(Range("A1").Value, vbMonday) < 6 Then
    macro1
    ElseIf Weekday(Range("A1").Value, vbMonday) = 6 Then macro2
    ElseIf Weekday(Range("A1").Value, vbMonday) = 7 Then macro3
End If
End Sub

bonne journée
@+

 

[isa44]

Re : Déclencher macro suivant le jour

OK merci c'est impeccable