bouton qui change la date

[jean]

Bonjour,

Ce genre de question a du être posée des dizaines de fois, mais auriez vous dans vos archives, un petit bout de code permettant lorsque l'on clique sur un bouton (à créer) de changer le contenu d'une cellule.

Je m'explique. la cellule dont je souhaite changer le contenu affiche une date predéfinie en l'occurrence c'est le premier jour du mois en cours.
lorsque je cliquerai sur le bouton en question, je voudrais que cette date soit remplacée par le premier jour du mois précédent.

Merci d'avance de toutes les reponses que vous pourrez m'apporter.

Cordialement

Jean

 

[Jean-Marie]

Bonjour

Voici un code

Public Sub ChangedateMoins()
Range("A1") = DateAdd("m", -1, Range("A1"))
End Sub

Public Sub ChangedatePlus()
Range("A1") = DateAdd("m", 1, Range("A1"))
End Sub

@+Jean-Marie

 

[jean]

Bonjour Jean-Marie

Etant donné que je n'ai encore jamais réaliser de macro, pourriez vous me dire comment générer un bouton sur une feuille Excel et comment lui attribuer le code ci dessus.

Merci

Jean

 

[jean]

Voici un exemple de ce que je souhaite.

Merci

 

[Pascal76]

Re

Tiens voilà ton fichier modifié

Pascal

 

[jean]

Ce message a obtenu sa réponse

Merci a tous ceux qui y ont participé