Application.FeatureInstall 属性

返回或设置 WPP 如何处理对所需功能尚未安装的方法和属性的调用。可读/写 MsoFeatureInstall 类型。

语法

表达式.FeatureInstall

表达式 一个代表 Application 对象的变量。

返回值
MsoFeatureInstall

说明

可以使用 msoFeatureInstallOnDemandWithUI 常量防止用户误以为在安装某功能时系统没有反应。使用带有错误捕获例程的 msoFeatureInstallNone 常量可防止安装最终用户功能。

注释
如果在字符串中引用未安装的演示文稿设计模板，则将产生运行时错误。无论 FeatureInstall 属性设置是什么，该模板都不会自动安装。要对当前未安装的模板使用 ApplyTemplate 方法，必须首先安装附加设计模板。为此，请通过运行 WPS Office安装程序（单击 Windows 控制面板中的“添加/删除程序”图标）安装WPP 的附加设计模板。

注释

如果在字符串中引用未安装的演示文稿设计模板，则将产生运行时错误。无论 FeatureInstall 属性设置是什么，该模板都不会自动安装。要对当前未安装的模板使用 ApplyTemplate 方法，必须首先安装附加设计模板。为此，请通过运行 WPS Office安装程序（单击 Windows 控制面板中的“添加/删除程序”图标）安装WPP 的附加设计模板。

MsoFeatureInstall 可以是下列 MsoFeatureInstall 常量之一。

msoFeatureInstallNone 默认值。调用未安装的功能时会产生可捕获的运行时自动错误。

msoFeatureInstallOnDemand 显示对话框提示用户安装新功能。

msoFeatureInstallOnDemandWithUI 安装时显示进度条。不提示用户安装新功能。

示例

以下示例检查 FeatureInstall 属性的值。如果该属性设置为 msoFeatureInstallNone，则代码显示一个消息框，以询问用户是否要更改属性设置。如果用户回答“是”，则此属性将设置为 msoFeatureInstallOnDemand。

示例代码

示例代码
`let a = Application if(a.FeatureInstall == msoFeatureInstallNone) { let Reply = MsgBox("Uninstalled features for this application " + "\r\n" + "may cause a run-time error when called." + "\r\n" + "\r\n" + "Would you like to change this setting" + "\r\n" + "to automatically install missing features when called?" , 52, "Feature Install Setting") if(Reply == 6) { a.FeatureInstall = msoFeatureInstallOnDemand } }`

let a = Application
if(a.FeatureInstall == msoFeatureInstallNone) {
    let Reply = MsgBox("Uninstalled features for this application " + "\r\n"
	+ "may cause a run-time error when called." + "\r\n" + "\r\n" + "Would you like to change this setting" 
	+ "\r\n"  + "to automatically install missing features when called?" , 52, "Feature Install Setting")
    if(Reply == 6) {
        a.FeatureInstall = msoFeatureInstallOnDemand
    }
}

请参阅