Table of contents
TOC
Réduire la table des matières
Développer la table des matières

Application.SaveAsWebObject, propriété (Visio)Application.SaveAsWebObject Property (Visio)

office 365 dev account|Dernière mise à jour: 14/03/2018
|
2 Collaborateurs

Renvoie une référence à l’interface IDispatch d’un objet VisSaveAsWeb . En lecture seule.Returns a reference to the IDispatch interface of a VisSaveAsWeb object. Read-only.

SyntaxeSyntax

expression . SaveAsWebObjectexpression . SaveAsWebObject

expression Variable qui représente un objet Application.expression A variable that represents an Application object.

Valeur renvoyéeReturn Value

ObjetObject

RemarquesRemarks

Une fois que vous avez une référence à l’objet VisSaveAsWeb , vous pouvez utiliser les objets, les méthodes et les propriétés de l’entité en tant que Page Web API pour publier les documents Microsoft Visio sur le Web. Pour plus d’informations sur l’enregistrement en tant que Page Web API, recherchez « Save as Web Page API » sur MSDN.Once you have a reference to the VisSaveAsWeb object, you can use the objects, methods, and properties of the Save as Web Page API to publish Microsoft Visio documents to the Web. For more information about the Save as Web Page API, search for "Save as Web Page API" on MSDN.

Pour pouvoir utiliser l’enregistrer en tant que Page Web API, vous devez obtenir une référence à la Bibliothèque Microsoft Visio 14.0 Enregistrer en tant que Web Type Microsoft Visual Basic ou Microsoft Visual Basic pour Applications projet (VBA). Pour obtenir cette référence dans VBA, utilisez la procédure suivante :To be able to work with the Save as Web Page API, you must get a reference to the Microsoft Visio 14.0 Save As Web Type Library in your Microsoft Visual Basic or Microsoft Visual Basic for Applications (VBA) project. To get this reference in VBA, use the following procedure:

  1. Dans le groupe de codes sous l’ongletdéveloppeur , cliquez sur Visual Basic.In the Code group on theDeveloper tab, click Visual Basic.

  2. Dans le menu Outils , cliquez sur références.On the Tools menu, click References.

  3. Dans la liste Références disponibles , sélectionnez Microsoft Visio 14.0 Enregistrer en tant que Web Type Library et cliquez sur OK.In the Available References list, select Microsoft Visio 14.0 Save As Web Type Library and click OK.

Si votre solution Visual Studio inclut la référence Microsoft.Office.Interop.Visio , cette propriété mappe les types suivants :If your Visual Studio solution includes the Microsoft.Office.Interop.Visio reference, this property maps to the following types:

  • Microsoft.Office.Interop.Visio.IVApplication.SaveAsWebObjectMicrosoft.Office.Interop.Visio.IVApplication.SaveAsWebObject

ExempleExample

Cette macro VBA indique comment utiliser la propriété SaveAsWebObject pour récupérer un objet VisSaveAsWeb . Il indique également comment récupérer un objet VisWebPageSettings , configurer les paramètres de la page Web et créer un page Web pour afficher le document Visio actif. La macro obtient un objet Visio, Application et passe à la procédure SaveAsWeb qui Récupère l’objet VisSaveAsWeb , configure les paramètres et crée la page Web.This VBA macro shows how to use the SaveAsWebObject property to get a VisSaveAsWeb object. It also shows how to get a VisWebPageSettings object, configure Web-page settings, and create a Web page to display the active Visio document. The macro gets a Visio Application object and passes it to the SaveAsWeb procedure, which gets the VisSaveAsWeb object, configures the settings, and creates the Web page.

Avant d’exécuter cette macro, obtenir une référence à la Bibliothèque Microsoft Visio 14.0 Enregistrer en tant que Web Type Library tel que décrit ci-dessus et remplacez path\filename dans le code par le chemin d’accès complet et le nom du fichier .htm que vous souhaitez créer sur votre ordinateur pour afficher le Page Web.Before running this macro, get a reference to the Microsoft Visio 14.0 Save As Web Type Library as described above, and replace path\filename in the code with the full path to and name of the .htm file you want to create on your computer to display the Web page.


Public Sub SaveAsWebObject_Example 

    Dim vsoApplication as Visio.Application 
    Call SaveAsWeb(vsoApplication) 

End Sub 


Public Sub SaveAsWeb (vsoApplication as Visio.Application) 

    Dim objSaveAsWeb As IVisSaveAsWeb 
    Dim objWebPageSettings As IVisWebPageSettings 

    ' Get a VisSaveAsWeb object that  
    ' represents a new Web page project 
    Set objSaveAsWeb = Application.SaveAsWebObject 

    ' Get a VisWebPageSettings object 
    Set objWebPageSettings = objSaveAsWeb.WebPageSettings 

    ' Configure Web-page settings 
    objWebPageSettings.StartPage = 1 
    objWebPageSettings.EndPage = 2 
    objWebPageSettings.LongFileNames = True 
    objWebPageSettings.TargetPath = "path\filename " 

    ' Now create the pages; because we did not identify  
    ' a particular document, the active document is saved 
    objSaveAsWeb.CreatePages 

End Sub
© 2018 Microsoft