Bonjour à tous,

j'aimerais adapté un code vba qui permet d'envoyer des données excel vers du word.
Pour que cela m'envois des données vers du excel.
Si quelqu'un pouvait m'aider? merci

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
..Tables(1) correspond au 1ER TABLEAU-
 
 
                                                             WordDoc.Tables(1).Columns(1).Cells(1).Range.Text = Sheets("Faits_constates").Range("P" & i).Text
                                                             WordDoc.Tables(1).Columns(2).Cells(1).Range.Text = Sheets("Faits_constates").Range("C" & i).Text