Exporter excel vers tableau Word
Bonjour à toutes et à tous
Alors pour établir mon problème:
- J'ai office 2003
- Un fichier excel Monclasseur
- Un fichier Word Mondocument (deja ouvert)
J'aimerais copier la valeur de la cellule A1 de mon fichier excel vers une cellule de mon tableau word dont le fichier est deja ouvert.
J'ai essayer d'utiliser :
Code:
1 2 3
| Dim WordDoc As Word.Document
Set WordDoc = GetObject("monDocument.doc") |
Pour sélectionner mon fichier word mais j'ai une erreur système &H800401E4
Quelqu'un pourrait-il m'aider ?
Sachant que j'ai la macro suivante pour ouvrir mon fichier word au départ:
Code:
1 2 3 4 5 6 7
| Dim wordApp As Word.Application
Dim WordDoc As Word.Document
Set wordApp = CreateObject("word.application") 'ouvre session word
wordApp.Visible = True 'word masqué pendant l'operation
Set WordDoc = wordApp.Documents.Open("C:\Documents and Settings\429527\Desktop\Pin item\Mondocument.doc") 'ouvre document Word |