Autres (RESOLU)Ouvrir un fichier word par fermeture excel

[chaelie2015]

Bonjour Forum
je souhaite ajouter a ce code le chemin d'un fichier word lors ce que je ferme le fichier EXCEL le fichier WORD s'ouvre automatiquement.

Sub fermer()
    ThisWorkbook.Save
    Application.Quit
End Sub

Merci

 

[Staple1600]

Bonsoit

@chaelie2015
Tu avais une piste à adapter dans les discussions similaires bas de page

Microsoft 365 - copier coller plusieurs tableaux excel dans un même word

Bonjour, J'ai réussi à faire un code pour copier coller un tableau dans word. Cependant, j'aimerais copier coller un autre tableau, Table_3 et d'autres encore dans ce même word à différents endroits, identifiés par signet. Avez-vous une idée ? Voici le code qui fonctionne actuellement pour un...

excel-downloads.com

 

[Staple1600]

Re

Donc en suivant mon conseil précédent, cela pourrait donner

'CHANGER LE CHEMIN ET NOM DU FICHIER
Const fic_WORD As String = "C:\Users\STAPLE\Documents\toto.docx"

Sub fermer()
'création Objet Word
Set WordApp = CreateObject("Word.Application"): WordApp.Visible = True
'Ouvrir le document Word
Set wd_Doc = WordApp.Documents.Open(fic_WORD)
ThisWorkbook.Save
Application.Quit
End Sub

NB: test OK sur mon PC.

 

[chaelie2015]

Bonjour JM
C'est parfait, merci pour la réponse
a+