export tableau excel vers word
Bonjour à tous,
J'ai presque fini mon travail : j'ai réussi grâce à vous à fusionner mes cellules mais je n'arrive pas à exporter tout sous Word. J'ai en effet un trableau sous excel 2007 et je veux l'exporter comme tel dans Word 2007.
J'ai trouvé cette macro mais elle ne fonctionne pas. Serait-elle destinée à une autre version d'excel ou de word ?
Code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
| Sub export()
Dim WordApp As Word.Application
Dim WordDoc As Word.Document
Set WordApp = New Word.Application
WordApp.Visible = True
Set WordDoc = WordApp.Documents.Add
Range("A1:N26871").Copy
WordApp.Selection.Paste
WordDoc.Tables(1).AutoFitBehavior wdAutoFitWindow
Application.CutCopyMode = False
End Sub |
Je ne vois pas oùça colle pas car je l'ai chopé sur le site...
On me demande pour qu'elle fonctionne d'activer la référence : Microsoft Word xx.x Object Library
j'ai trouvé ce lien mais rien à faire, ça ne coïncide pas avec World 2007...
Si quelqu'un a une idée, meci d'avance !!!
