Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Word Macro calendrier sur word

Créer une discussion

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

S'inscrire
M

Marine_blatz

Guest
Bonjour à tous,
Une opération complexe (je crois) qui vas vous mettre au défis et qui je ne vous le cache pas m'aiderai bien

J'ai un document nommé XXXXXXXXX-220129-XX
et dans celui ci il y a un menu déroulant calendrier

J'aurai besoin d'aide pour ceci, pour réalisé cela comme macro

1) la macro recherche dans le titre du document 6 chiffres consécutifs, commencant par "22"
2) Elle comprend que 22= 2022 (l'année) / 01 le mois / 29 le jour
3) elle recherche cette date le seul calendrier (liste déroulante) de mon doc, et clic indirectement sur le bon jour.

Quelqu'un est t-il assez compétent pour me réaliser cela svp ?
Bon fin de weekend à tous
 

Pièces jointes

Trier par date Trier par votes
Bonjour,
Si l'objectif est d'inscrire la date représentée dans le nom du doc sous la forme XXXXXXXXX-220129-XX, il suffit d'écrire :

VB: 
Private Sub Document_Open()
Dim T As Variant, dt As Double

    T = Split(ThisDocument.Name, "-")
    dt = DateSerial(Left(T(1), 2), Mid(T(1), 3, 2), Right(T(1), 2))
    ThisDocument.Paragraphs(1).Range.Text = Format(dt, "dd/mm/yyyy")
End Sub
p56
 

Pièces jointes

Vote positif 0 Vote négatif
Bonjour,
Et bien il suffit d'ajouter le jour-semaine dans le format (+ un saut de paragraphe pour faire plus joli)
VB: 
Private Sub Document_Open()
Dim T As Variant, dt As Double

    T = Split(ThisDocument.Name, "-")
    dt = DateSerial(Left(T(1), 2), Mid(T(1), 3, 2), Right(T(1), 2))
    ThisDocument.Paragraphs(1).Range.Text = Format(dt, "dddd dd/mm/yyyy") & vbCrLf
    Verif_Vitesse
End Sub
 
Vote positif 0 Vote négatif
Bonjour,

mais comment faire pour que cette macro une fois la date extrait dans le nom du fichier aille trouver le calendrier dans mon document word et la mettre à jour ?
 
Vote positif 0 Vote négatif
Identifiez-vous ou inscrivez-vous pour participer.
Rejoins nos membres "Supporter XLD" et booste ton expérience Excel !
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

  • Résolu(e)
Microsoft 365 date calendrier, obtenir année - mois et jour
2
Réponses
20
Affichages
2 K
Usine à gaz
M
  • Question Question
Microsoft 365 Macro filtre pour sélectionner les dates portant sur les 2 mois à venir à partir de la date du jour
Réponses
2
Affichages
1 K
michel.dupont
M
M
  • Question Question
Déterminer une durée à partir d'un mois, d'une année et de la date du jour
Réponses
4
Affichages
2 K
Moe
M
J
  • Question Question
Comment faire une recherche sur une date calculée ?
Réponses
1
Affichages
1 K
kingfadhel
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…