共用方式為


從命令列執行 [另存為網頁]

每個 Visio 產品都會自動安裝 [另存為網頁] 功能。 它會安裝為名稱為 SaveAsWeb的 Visio 附加元件。

若要從命令列介面執行 [另存為網頁] 功能,您可以呼叫 SaveAsWeb 附加元件,並使用所需的命令列選項。

您可以選擇下列其中一種技術。

在圖形的事件區段中建立使用 RUNADDONWARGS 函式的公式

您可以在 ShapeSheet 視窗中執行此動作,而不需要撰寫任何程式碼。 例如,您可以建立圖形,並在圖形的按兩下事件中插入 RUNADDONWARGS 的呼叫。 使用者只需要按兩下圖形,即可從繪圖建立網頁。 您也可以使用 Automation,使用 Visio 物件模型之Cell物件的Formula屬性來設定公式。

如需 RUNADDONWARGS 函式、Cell物件或Formula屬性的詳細資訊,請參閱 Visio 開發人員參考 (說明>搜尋>開發人員參考) 。

如需使用 RUNADDONWARGS 函式搭配另存為網頁的詳細資訊,請參閱本主題稍後的 使用 RUNADDONWARGS 函 式。

在 Visio 中撰寫 Visual Basic 宏 (或在使用 Visio Automation 物件模型啟動 SaveAsWeb 附加元件的個別元件) 中撰寫程式碼

使用Addon物件的Run方法,並傳遞命令列參數來指定網頁的屬性。

使用這項技術可能表示您撰寫的程式碼會比使用 Save as Web Page 物件模型指定參數少,但使用 Run 方法需要熟悉命令列參數。

如需Addon物件或Run方法的詳細資訊,請參閱 Visio 開發人員參考 (說明>搜尋>開發人員參考) 。

如需使用 Run 方法呼叫另存為網頁的詳細資訊,請參閱本主題稍後 的呼叫 SaveAsWeb 附加元件的 Run 方法

另存為網頁命令列選項

命令列參數的格式如下:/option=

例如,下列程式碼會設定 目標 參數:/target=c:\temp\mypage.htm

下表列出 [另存為網頁] 命令列介面的命令列選項。 [方法/屬性名稱] 資料行會列出物件模型中對應的方法或屬性。 如需特定選項的詳細資訊,請參閱此參考中的對應方法或屬性主題。

選項 預設 值類型 方法/屬性名稱
目標 無。 您必須提供目標值,否則 Visio 會產生錯誤。 文字 TargetPath
pagetitle 與檔檔案名相同 文字 PageTitle
支柱 TRUE 布林值 PropControl
altformat TRUE 布林值 AltFormat
資料夾 TRUE 布林值 StoreInFolder
theme Null 文字 ThemeName
startpage -1 (所有頁面) 數字 StartPage
endpage -1 (所有頁面) 數字 EndPage
openbrowser TRUE 布林值 OpenBrowser
screenres 1024x768 文字/數位1 DispScreenRes
priformat Xaml 文字/數位1 PriFormat
secformat PNG 文字/數位1 SecFormat
沉默 FALSE 布林值 SilentMode
安靜 FALSE 布林值 QuietMode
樣式 表 \ your_Visio_path\your_language_ID\Default.css 文字 Stylesheet
導覽列 TRUE 布林值 NavBar
搜索 TRUE 布林值 搜尋
panzoom TRUE 布林值 PanAndZoom

針對文字/數位數值型別,使用者可以指定文字 (,例如輸出類型的 vml) ,或是數位 (例如,1) 代表此輸出類型的索引。 每個輸出類型都會有自己的唯一索引。

針對 螢幕擷取畫面,文字和數位值是由 VISWEB_DISP_RES 列舉所定義。

使用 RUNADDONWARGS 函式

以下顯示使用 RUNADDONWARGS 函式呼叫 SaveAsWeb 附加元件的一種方式。

=RUNADDONWARGS("SaveAsWeb","/target=c:\temp\mypage.htm /quiet /prop /startpage=1 /endpage=3 /altformat /priformat=vml /secformat=jpg /openbrowser")

本主題先前所述的案例說明使用者只要按兩下繪圖中的圖形,即可產生該繪圖的網頁。 若要示範這一點,您可以將先前的公式放在繪圖頁面上任何圖案之 ShapeSheet 視窗中 [事件] 區段的 EventDblClick 儲存格中, (開啟 ShapeSheet 視窗、在繪圖視窗中選取圖形,然後在 [ 開發人員 ] 索引標籤上選擇 [顯示 ShapeSheet) ]。 在 ShapeSheet 儲存格中輸入公式之後,您可以在繪圖視窗中按兩下該圖形,以啟動 [另存為網頁] 功能。

如需 RUNADDONWARGS 函式、EventDblClick 儲存格和事件一節的詳細資訊,請參閱 Visio 開發人員參考 (說明>搜尋>開發人員參考) 。

呼叫 SaveAsWeb 附加元件的 Run 方法

[另存為網頁] 功能會安裝為名為 SaveAsWeb的 Visio 附加元件。 若要取得此附加元件的參考,請使用Visio Application物件的Addons集合。

下列範例示範如何將命令列參數傳遞至Addon物件的Run方法,以執行 SaveAsWeb 附加元件。

在此範例中,啟動附加元件的程式碼包含在 DocumentSaved 事件的事件處理常式中。 QuietMode屬性設定為True,如此使用者介面就不會顯示 [另存為網頁] 對話方塊。

Private Sub Document_DocumentSaved(ByVal Document As IVDocument) 
    Application.Addons("SaveAsWeb").Run "/quiet=True /target=C:\temp\test.htm" 
End Sub

如需 Addons集合、ApplicationAddon物件,以及DocumentSaved事件的詳細資訊,請參閱 Visio 自動化參考 (說明>搜尋>開發人員參考) 。

支援和意見反應

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