Date automatique WORD

carolineD -  
m@rina Messages postés 23940 Date d'inscription   Statut Non membre Dernière intervention   -
Bonjour,

J'ai besoin de votre aide!

Ma patronne me demande sur une page Word de mettre une date et que la même date +3mois ressorte sans passer par un tableau excel.
Je ne m'en sors pas du tout !

Merci de votre aide.

A voir également:

2 réponses

Raymond PENTIER Messages postés 58992 Date d'inscription   Statut Contributeur Dernière intervention   17 359
 
Si la première date est le 30 novembre 2014, quelle doit être exactement la seconde date ?

C'est toi qui est chargée de saisir la première date, ou est-ce que quelqu'un d'autre peut devoir le faire ?
0
carolineD
 
Bonjour,

La seconde date sera le 28 Février 2015. Et c'est moi qui rentre la première date.

Merci de votre aide.
0
Raymond PENTIER Messages postés 58992 Date d'inscription   Statut Contributeur Dernière intervention   17 359 > carolineD
 
Donc il ne s'agit pas de mois standard de 30 jours, comme pratiqué en commerce-gestion.
Il ne s'agit pas non plus de changer le mois sans toucher au jour (ce qui donnerait 30 février 2015).
Il faut donc un calcul plus sophistiqué, que Word ne permet pas.
Alors comme c'est toi qui entre les dates, tu ne t'occupes pas des lubies de ta patronne (qui ne connaît pas Word) et tu saisis toi-même les deux dates au clavier ...
0
m@rina Messages postés 23940 Date d'inscription   Statut Non membre Dernière intervention   11 466
 
Bonjour,

Avec les champs, c'est beaucoup trop compliqué.
Mais avec une macro, on peut faire simple, et en utilisant la fonction DateAdd, tu n'auras pas de date fausse (contrairement aux champs qui ne savent pas combien de jours dans un mois et combien de mois dans une année !).

La macro :
Sub date3mois()
Dim date1 As Date, date2 As Date
date1 = "30/11/2014"
date2 = DateAdd("m", 3, date1)
MsgBox date2
End Sub

Cette macro t'affiche la date + 3 mois dans un message. Maintenant, tout dépend de la manière dont tu as saisi la première date : champ ? contrôle de contenu ?...

m@rina
0