VBA execution macro tous les ans

Warder -  
ccm81 Messages postés 10909 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour,


Débutante en VBA j'ai inventé une formule pour répéter une macro tous les ans. Et évidemment cela ne marche pas :p

Sub date_tous_les_ans()

If Range("B12").Value = VBA.Date(yyyy, -1) Then
Call Historique

End If

End Sub


Je remercie tous ceux qui prendrons le temps de m'expliquer mes erreurs

Warder

A voir également:

1 réponse

ccm81 Messages postés 10909 Date d'inscription   Statut Membre Dernière intervention   2 433
 
bonjour
un exemple où la procedure message est appelée à l'ouverture du classeur si la date anniveraire est la date du jour
Private Sub Workbook_Open()
Dim DateAnniversaire As Date, DateJour As Date
  DateAnniversaire = Range("B2").Value
  DateJour = Now
  If (Day(DateJour) = Day(DateAnniversaire) And Month(DateJour) = Month(DateAnniversaire)) Then Call message
End Sub

bonne suite
0