bibiphoqie
XLDnaute Nouveau
Bonjour,
j'ai trouvé ce code sur internet pour "importer la totalité d'un document word sur une feuille excel"
J'ai essayé de lancer cette macro mais cela me donne une erreur de compilation à la ligne:
Dim WordDoc As Word.Document
L'erreur dit: "type défini par l'utilisateur non défini".
Pourriez-vous m'aider?? (je n'ai pas compris ce que voulais dire "Nécessite d'activer la référence "Microsoft Word xx.x Object Library"", c'est peut-être la raison pour laquelle ça ne marche pas?)
Merciii
j'ai trouvé ce code sur internet pour "importer la totalité d'un document word sur une feuille excel"
Nécessite d'activer la référence "Microsoft Word xx.x Object Library" :
vba
Dim WordDoc As Word.Document
Dim WordApp As Word.Application
Dim Wb As Workbook
Set Wb = Workbooks.Add(1)
Set WordApp = New Word.Application
WordApp.Visible = False
Set WordDoc = WordApp.Documents.Open("monDocument.doc", ReadOnly:=True)
With WordApp
.Selection.WholeStory
.Selection.Copy
End With
Wb.ActiveSheet.Range("A1").Select
Wb.ActiveSheet.Paste
WordApp.Application.Quit
Application.CutCopyMode = False
Wb.SaveAs "C:\copieDocument.xls"
J'ai essayé de lancer cette macro mais cela me donne une erreur de compilation à la ligne:
Dim WordDoc As Word.Document
L'erreur dit: "type défini par l'utilisateur non défini".
Pourriez-vous m'aider?? (je n'ai pas compris ce que voulais dire "Nécessite d'activer la référence "Microsoft Word xx.x Object Library"", c'est peut-être la raison pour laquelle ça ne marche pas?)
Merciii