共用方式為

VisWebPageSettings.ThemeName 屬性

  • 發行項

將網頁主題指派給您要建立的頁面。 讀取/寫入。

語法

運算式。ThemeName

表達 會傳回 VisWebPageSettings 物件的 運算式。

傳回值

字串

註解

使用 Microsoft Visio 所提供的主題或您自行建立的主題。 如果您想要建立自己的主題，請執行下列動作：

  1. 在 HTML 標籤中建立包含下列字詞的 HTM 檔案： ##VIS_SAW_FILE## 。 Visio 會將包含此標籤的 HTM 檔案辨識為主題檔案。

  2. 將檔案儲存在下列資料夾中： \ your_Visio_path\ your_language_ID\

您的主題檔案接著會出現在 [網頁主機] 下拉式清單的[另存新檔] 對話方塊中， (BackstageButton索引標籤 > [另存新> 檔] 清單>網頁 (*.htm;*.html) >發佈>進階) 。

範例

下列 Microsoft Visual Basic for Applications (VBA) 宏會示範如何使用 ThemeName 屬性，將 Visio) 所提供的基本主題 (指派給您要建立的網頁。

執行此宏之前，請將 取代 path\filename.htm 為您電腦上的有效目標路徑，以及您想要指派給網頁的檔案名。 此外，將 和 your_language_ID 取代 your_Visio_path 為電腦上 Microsoft Visio 的路徑 (例如 C：\Program Files\Microsoft Office\Visio14\1033...) 。

Public Sub ThemeName_Example() 
 Dim vsoSaveAsWeb As VisSaveAsWeb 
 Dim vsoWebSettings As VisWebPageSettings 
 
 Set vsoSaveAsWeb = Visio.Application.SaveAsWebObject 
 Set vsoWebSettings = vsoSaveAsWeb.WebPageSettings 
 
 With vsoWebSettings 
 .ThemeName = "your_Visio_path\your_language_ID\Basic.htm" 
 .TargetPath = "path\filename.htm" 
 End With 
 
 vsoSaveAsWeb.CreatePages 
End Sub

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎？ 如需取得支援服務並提供意見反應的相關指導，請參閱 Office VBA 支援與意見反應。