Macro pour copier des cellules puis lancer Word et les coller

[lcoulon]

Bonjour


Je cherche une faire une macro qui me permettrait de copier des cellules ( listées en colonne A ) et ensuite de lancer Word qui ouvrirai un documents formaté vierge ( planche d'étiquettes ) et coller les cellules dans cette planche

Savez vous si cela est possible ?

Merci à vous,

 

[sousou]

Re : Macro pour copier des cellules puis lancer Word et les coller

Bonjour lcoulon

C'est possible, mais pourquoi ne pas formater ta feuille d'étiquette dans excel?

 

[lcoulon]

Re : Macro pour copier des cellules puis lancer Word et les coller

Car je vais utiliser sous Word un document formaté avec une planche d'etiquette Avery et la mise en page est automatique sous Word en fonction du code etiquette Avery selectionné ...


Excel peut il faire cela également ?
si oui, je ne sais pas comment faire .

 

[sousou]

Re : Macro pour copier des cellules puis lancer Word et les coller

re

Effectivement ce n'est pas automatique dans excel, mais tu peux ajouter des feuilles dans excels que tu formatera à la main, et tu colle après tes données dans ces feuilles d'étiquettes. C'est efficace

 

[lcoulon]

Re : Macro pour copier des cellules puis lancer Word et les coller

Formater a la main sous Excel sera trop pénible.

Les planches d'étiquettes Avery sont au millimètre et les marges sont automatiquement bien rentrées

je voudrai qu' Excel lancer un document Word que j'aurai créé au préalable.

 

[lcoulon]

Re : Macro pour copier des cellules puis lancer Word et les coller

J'ai trouvé le code suivant

Sub Ouv_Word()
Set wrdApp = CreateObject("Word.Application" )
Set wrdDoc = wrdApp.Documents.Open("C:\L4736REV.RTF" )
wrdApp.Visible = True
End Sub


Mais cela ne me dit pas comment exporter dans cette page formatée, le contenu de chaque cellule d'une colonne venant d'Excel ...

Avez vous un idée ?
Merci à vous.