Ajout automatique de paragraphes dans Word ou Excel

Question

Bonjour,

J'ai des dossiers avec un certain nombre de participants. Pour chaque participant, il faut générer trois lignes à divers endroits d'un document, par exemple :

LISTE DES PARTICIPANTS

- Mme Machin

- Mr Truc

ACCORD DES PARTICIPANTS

- Mme Machin a donné son accord

- M. Truc a donné son accord

SIGNATURE

- Mme Machin a signé

- M. Truc a signé

Je souhaiterais que, si j'ajoute un participant dans la liste, les phrases suivantes (sur l'accord et la signature) se génèrent automatiquement pour ce participant. Est-ce possible sous Word ou Excel ? C'est normalement un document texte mais ça ne me dérange pas de passer par Excel si besoin, la mise en page n'en souffrira pas.

Dans Word, j'ai fait la première occurrence de Mme Machin et Mr Truc en contrôle de contenu. Puis les suivantes avec des renvois.

Merci !

Answer 1

Si j'ai tout bien compris (ce n'est pas sûr) il ne faut pas seulement pouvoir ajouter des noms, il faut aussi que ces noms soient repris avec un ajout de texte dans les autres plages.

Je crains qu'il faille passer par une macro événementielle pour cela, laquelle peut se lancer en sortie de contrôle de contenu. Tu trouveras des pistes sur la FAQ Word de l'amie Circé. Par exemple sur cette page, cette page ou encore cette page...

Answer 2

@Aliboron et @Hecathonshire

Merci beaucoup, ça a l'air de correspondre à ce que je veux, je vais regarder ça en détail !

Answer 3

Bonjour,

Je te propose cette macro à adapter

Tu places un signet Accord et Signature dans ton texte puis à chaque lancement de la macro les signets seront mis à jour.

(en considérant ton contrôle Liste est le 1er contrôle)

Sub MajSignets()

Dim rgListe      As Range 

Dim objPara      As Paragraph 

Dim strAccord    As String 

Dim strSignature As String 

Set rgListe = ActiveDocument.ContentControls(1).Range 

For Each objPara In rgListe.Paragraphs 

    strAccord = strAccord & Left(objPara.Range.Text, Len(objPara.Range.Text) - 1) & " a donné son accord." & vbCrLf 

    strSignature = strSignature & Left(objPara.Range.Text, Len(objPara.Range.Text) - 1) & " a signé." & vbCrLf 

Next 

Set RgSignetAcc = ActiveDocument.Bookmarks("Accord").Range 

RgSignetAcc.Text = strAccord 

ActiveDocument.Bookmarks.Add "Accord", RgSignetAcc 

Set RgSignetSig = ActiveDocument.Bookmarks("Signature").Range 

RgSignetSig.Text = strSignature 

ActiveDocument.Bookmarks.Add "Signature", RgSignetSig 

Set rgListe = Nothing 

Set RgSignetAcc = Nothing 

Set RgSignetSig = Nothing 

End Sub

Answer 4

Bonjour, merci pour cette réponse mais je maîtrise déjà toutes ces étapes.

Ma question est comment ajouter automatiquement des participants s'il y en a plus de 2? Je voudrais pouvoir ajouter le nom de Mr Bidule, par exemple, à la suite de Mr Truc, et que les paragraphes concernant l'acceptation et la signature se rajoutent automatiquement.

Answer 5

Bonjour, merci de m’avoir contacté. Je m’appelle Deeksha et je suis un utilisateur de Microsoft comme vous et je vais essayer de vous aider du mieux que je peux aujourd’hui.

Méthode 1 : Utilisation des contrôles de contenu et des champs REF dans Microsoft Word

Étape 1 : Configurer les contrôles de contenu pour les participants Contrôle d’insertion de contenu : Placez votre curseur à l’endroit où vous souhaitez insérer le nom du participant dans la section « LISTE DES PARTICIPANTS ». Accédez à l’onglet Développeur (si vous ne voyez pas l’onglet Développeur, vous devrez l’activer). Cliquez sur Contrôle de contenu en texte enrichi pour insérer un contrôle de contenu pour le nom du participant.

Étape 2 : Configurer les champs REF pour l’accord et la signature Insérez le champ REF pour l’accord : Placez votre curseur à l’endroit où vous souhaitez insérer la déclaration d’accord pour le participant. Accédez à l’onglet Insertion > champ >Pièces rapides. Sélectionnez Réf dans la liste. Dans la zone Nom du champ, tapez REF NomParticipantAccepté. Remplacez ParticipantName par le nom du participant. Cliquez sur OK. Insérer un champ REF pour la signature : Placez votre curseur à l’endroit où vous souhaitez insérer la déclaration de signature du participant. Accédez à l’onglet Insertion > champ >Pièces rapides. Sélectionnez Réf dans la liste. Dans la zone Nom du champ, tapez REF ParticipantNameSigned. Remplacez ParticipantName par le nom du participant. Cliquez sur OK.

Étape 3 : Mettre à jour les champs REF Mettre à jour les champs REF : Après avoir ajouté un nouveau participant, cliquez avec le bouton droit de la souris sur chaque champ REF et sélectionnez Mettre à jour le champ pour mettre à jour les références.

Méthode 2 : Utiliser Excel pour automatiser le processus Si vous préférez utiliser Excel pour automatiser ce processus, vous pouvez configurer un tableau avec une liste de participants et utiliser des formules Excel pour générer les phrases d’accord et de signature.

Étape 1 : Créer un tableau Excel Créez un tableau Excel : Ouvrez une nouvelle feuille de calcul Excel et créez un tableau avec une colonne pour le nom du participant.

Étape 2 : Générer des phrases à l’aide de formules Générer une phrase d’accord : Dans la colonne suivante, utilisez la formule suivante pour générer la phrase d’accord :

=A2 & " a accepté » Remplacez A2 par la cellule contenant le nom du participant.

Générer une phrase de signature : Dans la colonne suivante, utilisez la formule suivante pour générer la phrase de signature : = A2 & " signé »

Remplacez A2 par la cellule contenant le nom du participant.

Étape 3 : Copiez les phrases générées dans Word Copier des phrases dans Word : Copiez les phrases générées à partir d’Excel et collez-les dans votre document Word.

Essayez ces étapes et, espérons-le, cela résoudra votre problème. Si vous avez besoin d’aide ou d’assistance supplémentaire, veuillez nous le faire savoir. Vous pouvez également contacter le support Microsoft si le problème persiste.

Sinceres salutations Deeksha

Cette réponse a été traduite automatiquement. Par conséquent, il peut y avoir des erreurs grammaticales ou des expressions étranges.