Je travaille actuellement sur un programme qui me permet de calculer automatiquement un devis dans Excel.
 
Maintenant, j'aimerai "recracher" le tout sous forme d'un document word proprement mis en page.
 
D'où ma question :
Est-il possible de passer des variables obtenues dans Excel via une macro écrite sous Excel dans un document Word?
 
Question subsidiaire :
Puis-je envoyer également ces données dans une base Access?
 
D'avance merci!

Je m'auto-réponds :
Sub Ouverture_Word()
 
Dim wrdApp As Word.Application
Dim wrdDoc As Word.Document
Dim i As Integer
    Set wrdApp = CreateObject("Word.Application" )
    wrdApp.Visible = True
    Set wrdDoc = wrdApp.Documents.Add
    With wrdDoc
        For i = 1 To 12
            .Content.InsertAfter "Here is a example test line #" & i
            .Content.InsertParagraphAfter
        Next i
        If Dir("C:\MyNewWordDoc.doc" ) <> "" Then
            Kill "C:\MyNewWordDoc.doc"
        End If
        .SaveAs ("C:\MyNewWordDoc.doc" )
        .Close ' close the document
    End With
    wrdApp.Quit ' close the Word application
    Set wrdDoc = Nothing
    Set wrdApp = Nothing
End Sub