FAQ ExcelConsultez toutes les FAQ

Nombre d'auteurs : 46, nombre de questions : 845, dernière mise à jour : 30 mars 2017 

 
OuvrirSommaireLes macros VBApiloter d'autres applications depuis ExcelPiloter 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.Quit
Créé le 19 février 2009  par SilkyRoad
  

Les sources présentées sur cette page sont libres de droits et vous pouvez les utiliser à votre convenance. Par contre, la page de présentation constitue une œuvre intellectuelle protégée par les droits d'auteur. Copyright © 2009 Developpez Developpez LLC. Tous droits réservés Developpez LLC. Aucune reproduction, même partielle, ne peut être faite de ce site et de l'ensemble de son contenu : textes, documents et images sans l'autorisation expresse de Developpez LLC. Sinon vous encourez selon la loi jusqu'à trois ans de prison et jusqu'à 300 000 € de dommages et intérêts.