Table of contents
TOC
Collapse the table of content
Expand the table of content

Application.FeatureInstall Property (PowerPoint)

office 365 dev account|Last Updated: 6/12/2017
|
1 Contributor

Returns or sets how Microsoft PowerPoint handles calls to methods and properties that require features not yet installed. Read/write.

Syntax

expression. FeatureInstall

expression A variable that represents an Application object.

Return Value

MsoFeatureInstall

Remarks

You can use the msoFeatureInstallOnDemandWithUI constant to prevent users from believing that the application is not responding while a feature is being installed. Use the msoFeatureInstallNone constant with error trapping routines to exclude end-user feature installation.

Note If you refer to an uninstalled presentation design template in a string, a run-time error is generated. The template is not installed automatically regardless of your FeatureInstall property setting. To use the ApplyTemplate method for a template that is not currently installed, you first must install the additional design templates. To do so, install the Additional Design Templates for PowerPoint by running the Microsoft Office installation program (available by clicking the Add/Remove Programs icon in Windows Control Panel).

The value of the FeatureInstall property can be one of these MsoFeatureInstall constants.

ConstantDescription
msoFeatureInstallNoneThe default. A trappable run-time automation error is generated when uninstalled features are called.
msoFeatureInstallOnDemandA dialog box is displayed prompting the user to install new features.
msoFeatureInstallOnDemandWithUIA progress meter is displayed during installation. The user is not prompted to install new features.

Example

This example checks the value of the FeatureInstall property. If the property is set to msoFeatureInstallNone, the code displays a message box that asks the user whether they want to change the property setting. If the user responds "Yes", the property is set to msoFeatureInstallOnDemand.

With Application
    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 when called?" _
                , 52, "Feature Install Setting")

            If Reply = 6 Then
                .FeatureInstall = msoFeatureInstallOnDemand
            End If
    End If
End With

See also

Concepts

Application Object

© 2018 Microsoft