Bonjour à tous,
je souhaite pouvoir copier automatiquement des résultats de mes feuilles excel (plages de données et graphiques) dans un doc word. On m'avais déjà donné un petit prog sur ce site mais ça ne marche pas. ça me marque 'erreur automation' au niveau du document.add.
Voici le petit prog:
Sub creationword()
Dim aaa As Object
Set aaa = CreateObject('word.application')
aaa.documents.Add
aaa.Selection.typetext 'ça marche!!!!!'
aaa.activedocument.SaveAs 'D:\\Chris\\cool.doc'
aaa.activedocument.Close
Set aaa = Nothing
End Sub
en espérant qu'encore une fois quelqu'un trouvera une solution à mon probleme....
PS: j'ai bien coché dans références le 'microsoft word 9.0 object library'