Une macro pour ajouter une année à la cellule active ?

Bonjour Forum !

Je ne vois pas trop comment écrire une macro qui ajoute une année à la valeur de la cellule active, en vue de créer un bouton.

(il ne s'agit pas d'ajouter 365, car il peut y avoir des années bissextiles...).

Quelqu'un peut-il m'aider ?

Merci !!!

Bonsoir

Ta date en A1

Sub test()
  Range("A1") = DateAdd("yyyy", 1, Range("A1"))
End Sub

Merci beaucoup !!!

Pour les novices en VBA - comme moi - voilà le code pour ajouter 1 an à la cellule active :

Sub test()
  ActiveCell = DateAdd("yyyy", 1, ActiveCell)
End Sub

Et pour un mois, c'est :

Sub test()
  ActiveCell = DateAdd("m", 1, ActiveCell)
End Sub