傳回或設定常數) (值，以指定 Excel 如何處理對需要尚未安裝之功能的方法和屬性的呼叫Microsoft。 可以是下表所列的其中一個 MsoFeatureInstall 常數。 讀取/寫入 MsoFeatureInstall 。
語法
表達。功能安裝
expression 代表 Application 物件的變數。
註解
MsoFeatureInstall 可以是下列其中一個常數：
- msoFeatureInstallNone 的 InstallNone 。 呼叫已解除安裝的功能時，在執行階段產生一般自動化錯誤。 這是預設常數。
- msoFeatureInstallOnDemand。 提示使用者安裝新功能。
- msoFeatureInstallOnDemandWithUI 的 InstallOnDemandWithUI 。 安裝過程中顯示進度表;不會提示使用者安裝新功能。
使用 msoFeatureInstallOnDemandWithUI 常數，防止使用者認為應用程式在安裝功能時沒有回應。 如果您想要僅需一個可以安裝功能開發人員，使用 msoFeatureInstallNone 常數。
如果您將 DisplayAlerts 屬性設定為 False，即使 FeatureInstall 屬性設定為 msoFeatureInstallOnDemand ，也不會提示使用者安裝新功能。 DisplayAlerts 屬性設為 True ，如果 FeatureInstall 屬性設為 msoFeatureInstallOnDemand 會顯示安裝進度百分比。
範例
本範例會啟動 Microsoft Word 的一個新的執行個體，並檢查 FeatureInstall 屬性的值。 同時確定要設定對 Microsoft Word 物件程式庫的參照。 如果 FeatureInstall屬性設定為 msoFeatureInstallNone，則本程式碼將顯示一個訊息方塊，以詢問使用者是否希望變更該屬性的設定。 如果使用者回應 是 ，則屬性會設定為 msoFeatureInstallOnDemand。
Dim WordApp As New Word.Application, Reply As Integer
Application.ActivateMicrosoftApp xlMicrosoftWord With WordApp
If .FeatureInstall = msoFeatureInstallNone Then
Reply = MsgBox("Uninstalled features for this " _
& "application " & vbCrLf _
& "may cause a run-time error when called." & vbCrLf _
& vbCrLf _
& "Would you like to change this setting" & vbCrLf _
& "to automatically install missing features?" _
, 52, "Feature Install Setting")
If Reply = 6 Then
.FeatureInstall = msoFeatureInstallOnDemand
End If
End If
End With
支援和意見反應
有關於 Office VBA 或這份文件的問題或意見反應嗎？ 如需取得支援服務並提供意見反應的相關指導，請參閱 Office VBA 支援與意見反應。