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 65,6% France
Chine 8,2% Chine
États-Unis d'Amérique 7,0% États-Unis d'Amérique

Total:

180

Pays
018554190
Aujourd'hui: 137
Hier: 371
Cette semaine: 4.509
Semaine dernière: 2.097
Ce mois: 10.439