Macro excel et word

Il y a bien longtemps que je n'ai pas fait de macro mais bon moi j'essaierais comme cela:

Je créerais une macro Autoexec sur le document Word qui Imprimerais et refermerais le document.

Sur le fichier Excel je créerais un lien hypertexte qui pointe sur ce fichier Word et dans la macro Excel je ferais un clic sur ce lien qui ouvrirait le fichier Word qui lui même autoexecutera sa macro d'impression.

Mais bon pour le détail de la programmation je n'ai malheureusement pas le temps de le faire et donc de le tester.

Bon courage

merci bien mais c'est justement le détail qui m'intéresserait vu que je ne suis pas une pro!!

Bonsoir,

On peut utiliser le shell ou bien l'automation.

Par automation :

Sub impr_word()
Dim word_appli As Object
Dim mon_docword As Object

Set word_appli = GetObject(, "Word.Application")

'Ouverture du doc Word
word_appli.documents.Open Filename:="C:\Mes documents...\monfichier.doc"
Set mon_docword = word_appli.ActiveDocument
'impression du doc
mon_docword.PrintOut
'fermeture du doc
mon_docword.Close

End Sub

Faudrait peut être ajouter une gestion d'erreur...

m@rina