FAQ Excel
FAQ ExcelConsultez toutes les FAQ
Nombre d'auteurs : 46, nombre de questions : 845, dernière mise à jour : 30 mars 2022
Sommaire→Les macros VBA→piloter d'autres applications depuis Excel→Piloter Publisher
Le pilotage de Publisher depuis Excel nécessite d'activer la référence 'Microsoft Publisher xx Object Library'.
xx correspond à la version de Publisher installée sur votre poste.
La procédure suivante ouvre le document Publisher puis sauvegarde une copie au format .htm.
Vba
Sélectionnez
Dim AppMsPub As Publisher.Application
Dim DocMsPub As Publisher.Document
'Crée l'instance Publisher
Set AppMsPub = CreateObject("publisher.Application")
'Masque l'application pendant l'opération.
'Indiquez la valeur True pour voir l'application Publisher.
AppMsPub.ActiveWindow.Visible = False
'Ouvre le document
Set DocMsPub = AppMsPub.Open("C:\Composition1.pub")
'Crée une copie au format .htm
DocMsPub.SaveAs Filename:="C:\NomcopieWeb", _
Format:=pbFileHTMLFiltered
'Ferme le document
DocMsPub.Close
'Ferme l'application
AppMsPub.QuitCréé le 19 février 2009 par SilkyRoad