Recherche

Avec une macro très simple à laquelle vous allez ajouter un raccourci clavier. Vous pouvez également ajouter un bouton relié à la macro sur la barre d'outils.

C'est une macro qui va permettre, lors de la création d'une facture, d'insérer automatiquement la date de la fin du mois suivant (30 jours fin de mois).

Copiez cette macro et collez-la dans le Normal.dotm. La macro insérera la date du fin de mois suivant au point d'insertion.

Sub finmois()
Dim madate
madate = DateSerial(Year(Now()), Month(Now()) + 2, 0)
Selection.TypeText Text:=madate
End Sub

Statistiques

France 71,8% France
Canada 5,2% Canada
Chine 4,1% Chine

Total:

159

Pays
018469899
Aujourd'hui: 172
Hier: 381
Cette semaine: 968
Semaine dernière: 2.486
Ce mois: 6.304