Partager via


Propriété VisWebPageSettings.TargetPath

Spécifie le chemin d’accès où la page web et ses fichiers de prise en charge sont placés. Lecture-écriture.

Syntaxe

expression. TargetPath

Expression Expression qui renvoie un objet VisWebPageSettings .

Valeur renvoyée

String

Remarques

Lorsque vous enregistrez un dessin en tant que page web, vous devez utiliser la propriété TargetPath pour fournir le chemin d’accès cible complet. La propriété TargetPath est réinitialisée à une valeur Null après chaque exportation ; chaque fois que vous enregistrez un dessin en tant que page web, vous devez fournir explicitement le chemin cible. En outre, la valeur TargetPath n’est pas conservée entre les sessions de Visio.

La valeur de la propriété TargetPath correspond au nom du dossier et au nom de fichier sélectionnés dans la boîte de dialogue Enregistrer sous (onglet >BackstageButtonEnregistrer sous).

Exemple

La macro suivante montre comment enregistrer le document actif en tant que page web et placer le fichier HTML résultant et les fichiers de prise en charge en tant que fichiers plats dans le dossier targetpath . Étant donné que la propriété StoreInFolder a la valeur False, les fichiers de prise en charge sont placés dans le même dossier que le fichier HTML racine, au lieu d’un dossier distinct portant le nom filename_files ou filename.files, selon la langue.

Public Sub TargetPath_Example()
    Dim vsoSaveAsWeb As VisSaveAsWeb 
    Dim vsowebSettings As VisWebPageSettings

    Set vsoSaveAsWeb = Visio.Application.SaveAsWebObject 
    Set vsoWebSettings = vsoSaveAsWeb.WebPageSettings
 
    With vsoWebSettings
         .StoreInFolder = False
         .TargetPath = "<variable>targetpath\filename.htm</variable>"
    End With
 
    vsoSaveAsWeb.CreatePages 
End Sub

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.