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,4% France
Canada 5,1% Canada
Chine 4,5% Chine

Total:

162

Pays
018482441
Aujourd'hui: 153
Hier: 458
Cette semaine: 1.451
Semaine dernière: 2.661
Ce mois: 7.953