共用方式為

VisWebPageSettings.Stylesheet 屬性

  • 發行項

指定由 Microsoft Visio 提供的級聯樣式表單 (CSS) ，或您已建立的套用至網頁的樣式表單。 讀取/寫入。

語法

運算式。樣式 表

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

傳回值

字串

註解

樣式表單可以是 Visio 提供的樣式表單，也可以是您自行建立的樣式表單。 如果您將建立的樣式表單儲存在下列資料夾中，它會出現在 [另存新檔]對話框的 [進階] 索引標籤上的[樣式表單] 下拉式清單中， (BackstageButton索引標籤 > [另存新> 檔] 類型清單 >網頁 (*.htm;*.html) >發佈>進階) ：

\ \ your_Visio_pathyour_language_ID\

Visio 會搜尋名為 的資料夾來識別樣式表單，例如，CSS 檔案的 1033) (。

範例

下列 Microsoft Visual Basic for Applications (VBA) 宏會示範如何使用 Stylesheet 屬性，將 Visio) 提供的 Steel 樣式表單 (指派給您要建立的網頁。

執行此宏之前，請將 取代 path\filename.htm 為您電腦上的有效目標路徑，以及您想要指派給網頁的檔案名。 此外，將 和 your_language_ID 取代 your_Visio_path 為電腦上 Visio 樣式表單的路徑，例如：

C：\Program Files\Microsoft Office\Visio14\1033...

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

支援和意見反應

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