Bonjour  
 
Je n'arrive pas a trouve une solution a mon probleme  
 
Je cherche le moyen d'imprimer certaine cellule de mon tableau dans un document rediger par word ou excel peut importe  
 
je veux en faites remplacer certain trou de mon texte par la valeur des cellules de Excel
 
Je ne sais pas par ou commence  
 
Quelqu'un a t'il une idée

 
je sais que c'est possible assez facilement avec access et les etats.
est tu obligé d'utiliser excel ? (pour ta base de donnees )

Oui Excel obligatoire
mais la feuille qui continet le Texte peut etre sur excel  
pour faciliter le code
 

Dim WordApp As Word.Application
Dim WordDoc As Word.Document
Dim i As Byte
 
    Set WordApp = CreateObject("word.application" )    'ouvre une session Word
    Set WordDoc = WordApp.Documents.Open("monDocument.doc" )    'ouvre le document Word
    WordApp.Visible = False    'Word est masqué pendant l'opération
 
    For i = 1 To 3
        'les signets du document Word sont nommés Signet1 , Signet2 , Signet3
        WordDoc.Bookmarks("Signet" & i).Range.Text = Cells(i, 1)
    Next i
 
    WordApp.Visible = True    'affiche le document Word
    'WordDoc.PrintOut 'Pour imprimer le doc obtenu
 
    'WordDoc.Close True 'ferme le document word en sauvegardant les données
    'WordApp.Quit 'ferme la session Word

Bonjour
 
Tout simplement une fusion ? ou tu mettrais tes champs de fusion a la place de tes trous dans ton texte ?
 
Cordialement

Comme dje69r, je pense qu'un simple document de fusion Word me semble le plus simple et le plus pratique.
Aucun besoin de programmation.