Visio (的 Application.VBAEnabled 屬性)

會指定是否在應用程式中啟用 Microsoft Visual Basic for Applications (VBA)。 唯讀。

語法

運算式。VBAEnabled

expression 代表 Application 物件的變數。

傳回值

布林值

註解

如果在開啟包含 VBA 專案的文件時啟用 VBA，則當開啟該文件時，會停用 VBA：

• Microsoft Visio 已無法執行該文件中的巨集，但是這些巨集名稱仍會出現在 [巨集] 對話方塊中 (按 Alt+F8)。

• Visio 會繼續對此專案引發事件。

如果在開啟包含 VBA 專案的文件時停用 VBA，則當開啟該文件時，會啟用 VBA：

• 即使已經啟用 VBA，Visio 還是不會對此專案引發事件。

• 巨集仍維持停用狀態。

如果在 [信任中心] 的 [宏設定] 頁面的[開發人員宏設定] 下選取 [信任存取 VBA 專案物件模型] 核取方塊，VBAEnabled屬性會設定為True， (按一下[檔案]索引標籤，依序按一下 [選項]、[信任中心]，然後按一下 [信任中心設定]) 。 如果沒有選取，則屬性會報告 False。

範例

您的文件可能需要讓 VBA 正確執行，例如，文件之 DocumentOpened 事件處理常式中的程式碼。 下列程式碼可以從附加元件執行，以確認在開啟相依於 VBA 的文件之前，是否會在應用程式中啟用 VBA。

在執行這個程序之前，請為 filename 變數提供有效的文件檔案名稱。

Public Sub VBAEnabled_Example() 
 
    Dim vsoDocument As Visio.Document 
    Dim blsStatus As Boolean 
 
    blsStatus = Application.VBAEnabled  
    If Not blsStatus Then 
 
        MsgBox "For this process to continue, VBA must be enabled." & _ 
        " Please enable VBA and start over." 
 
    Else 
 
        Set vsoDocument = Documents.Open("filename ") 
 
    End if 
 
End Sub

支援和意見反應

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