Transfert Excel vers Word

Thibaut_C. Messages postés 3 Date d'inscription   Statut Membre Dernière intervention   -  
blackmefias_3350 Messages postés 709 Date d'inscription   Statut Membre Dernière intervention   -

Bonjour à tous,

Je travaille sur un modèle de programme de messe dans Microsoft Word, que j’aimerais automatiser au maximum.

???? Objectif

Dans mon document Word, je souhaite :

Sélectionner une date de messe (via un contrôle de contenu ou un champ date)

Récupérer automatiquement, depuis un fichier Excel externe, la liste des messes postérieures à cette date

Afficher ces messes dans une section “annonces” en fin de document

???? Configuration actuelle

Dans Microsoft Word :

Un contrôle de contenu contenant la date de la messe (titre : datefinale)

Un contrôle de contenu destiné à afficher les annonces (titre : annonces)

Dans Microsoft Excel :

Un fichier contenant un tableau avec :

Colonne A : dates des messes

Colonne B : intitulé des messes

Format de date standard (non texte)

???? Ce que je cherche à faire

Créer une macro VBA dans Word qui :

ouvre le fichier Excel

parcourt les lignes

compare chaque date à la date sélectionnée dans Word

récupère uniquement les messes dont la date est supérieure

insère ces résultats dans le contrôle de contenu “annonces”

❓ Mes questions

Quelle est la meilleure méthode pour récupérer et filtrer ces données (VBA pur, ADO, autre) ?

Comment sécuriser la récupération de la date depuis le contrôle de contenu Word ?

Y a-t-il une façon plus simple ou plus robuste de faire cette automatisation ?

Merci d’avance pour votre aide ????


Android / Chrome 147.0.0.0

2 réponses

  1. NonoM45 Messages postés 1020 Date d'inscription   Statut Membre Dernière intervention   5
     

    Bonjour,

    Pourquoi faire simple, quand on veut faire compliquer !?

    Perso je gèrerai tout dans Excel avec une feuille dédiée aux impressions

    Bonne réflexion

    0
  2. blackmefias_3350 Messages postés 709 Date d'inscription   Statut Membre Dernière intervention   70
     

    Bonjour,  

    avez-vous essayer  avec le publipostage ?    

    mais attention car la date doit être au format  numérique . 
    il est possible de forcer le bon format date dans word. 

    il suffit d'ajouter   \ @ "dd mmm  yyyy"   dans le champ de fusion date .  

    ex:   vous avez  dans Word  { MERGEFEILD DateMesse }   
            et vous ajouter    \ @ "dd mmm  yyyy" 

            pour avoir  {MERGEFEILD DateMesse \@ "dd MMM yyyy" } 

          


    0