Fermer Word depuis Excel en VBA

Bonjour a tous

J'utilise ce code depuis Excel pour lancer un publipostage sur Word.. cela fonctionne parfaitement

Sub Etiquettes_SAV()

' Publipostage
Set wordapp = CreateObject("word.Application")
wordapp.Visible = True
wordapp.Documents.Open "D:\Dropbox\Chris\Dropbox\5) Envoi - SAV\Suivi Envoi\7 - SAV-Publipostage.docm"

End Sub

Est il possible de fermer l'application distante Word a la fin de ce code ?

Merci

Salut Totoche31

Pour moi non, car l'objet WordApp contient le document

Donc si on ferme l'application, on ferme le document

A+

Merci de la réponse.

Mais peut être je n'ai pas été assez clair, Si on ferme le document Word , ca ne pose pas de problème au contraire. c'est le but recherché.

Bonjour Totoche31

Je n'ai pas bien compris la logique du coup mais dans ce cas là, il faut le faire proprement

Sub Etiquettes_SAV()
  Dim WordApp As Object, WordDoc As Object
  ' Publipostage
  Set WordApp = CreateObject("word.Application")
  WordApp.Visible = True
  ' Ouvrir le fichier
  Set WordDoc = WordApp.Documents.Open("D:\Dropbox\Chris\Dropbox\5) Envoi - SAV\Suivi Envoi\7 - SAV-Publipostage.docm")
  ' Fermer le fichier
  WordDoc.Close
  WordApp.Quit
End Sub

A+

Voila une operation rondement mené

Impeccable, Merci beaucoup

Rechercher des sujets similaires à "fermer word vba"