Discussion :

[Marc31]

Bonjour à tous,

Je travaille sur un document excel, où l'on va rentrer des personnes qui font des formations.
De ce document je fais une extraction sur un autre fichier excel des personnes qui sont validé pour faire la formation.
A partir de se fichier excel, j'aimerais envoyer les données dans un tableau word.
C'est assez difficile car le nombre de personne n'est pas fixe.
Si quelqu'un pouvait m'aider, merci!

Bonne journée

[L'Albatros]

Cela dépend de votre niveau en VBA.
Si vous êtes débutant, mieux se contenter d'un publipostage, qui ceci dit répondrait sûrement à au moins une partie de vos attentes.
Quel est donc votre niveau en VBA ?

[Marc31]

Mon niveau est debutant mais le publipostage ça marche (toutes les personnes dans la feuille excel sortent sur differents word) et maintenant j'aimerais faire une feuille presence donc reunir toutes les personnes sur la feuille excel et les envoyer sur une feuille word dans un tableau.

[kiki29]

Salut, peut-être dans la FAQ

[Marc31]

Merci et j'ai deja regardé mais rien qui m'aide!

[kiki29]

Re, et pourtant cela correspond à ta demande ?

A partir de ce fichier excel, j'aimerais envoyer les données dans un tableau word

Nécessite d'activer la référence "Microsoft Word xx.x Object Library"

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
Dim WordApp As Word.Application
Dim WordDoc As Word.Document
 
    Set WordApp = New Word.Application
    WordApp.Visible = True
    Set WordDoc = WordApp.Documents.Add
 
    Range("A1:H10").Copy
 
    WordApp.Selection.Paste
    WordDoc.Tables(1).AutoFitBehavior wdAutoFitWindow
 
    Application.CutCopyMode = False