Propriété Application.FeatureInstall (Access)

Utilisez la propriété FeatureInstall pour spécifier ou déterminer comment Microsoft Access gère les appels aux méthodes et propriétés qui nécessitent des fonctionnalités qui ne sont pas encore installées. En lecture/écriture MsoFeatureInstall.

Syntaxe

expression. FeatureInstall

expressionUne variable qui représente un objetApplication.

Remarques

Lorsque le code VBA fait référence à un objet qui n’est pas installé, la technologie Microsoft Installer tente d’installer la fonctionnalité requise. Vous utilisez la propriété FeatureInstall pour contrôler ce qui se passe quand un objet non installé est référencé. Quand la valeur par défaut est affectée à cette propriété, toute tentative d'utilisation d'un objet non installé commande à l'Installateur d'installer la fonctionnalité requise. Dans certaines circonstances, cela peut durer un certain temps et l'utilisateur peut alors penser que l'ordinateur a cessé de réagir aux autres commandes.

Vous pouvez définir la propriété FeatureInstall sur msoFeatureInstallOnDemandWithUI afin que les utilisateurs puissent voir qu’un événement se produit pendant l’installation de la fonctionnalité. Vous pouvez aussi affecter à la propriété FeatureInstall la constante msoFeatureInstallNone si vous souhaitez tenir compte de l'erreur renvoyée et afficher votre propre boîte de dialogue ou exécuter une autre action personnalisée.

Si la propriété UserControl est définie sur False, les utilisateurs ne sont pas invités à installer de nouvelles fonctionnalités, même si la propriété FeatureInstall a la valeur msoFeatureInstallOnDemand. En revanche, si la propriété UserControl a pour valeur True, une jauge de progression de l'installation s'affiche quand la propriété FeatureInstall a pour valeur msoFeatureInstallOnDemand.

Exemple

Cet exemple vérifie la valeur de la propriété FeatureInstall. Si la propriété a la valeur msoFeatureInstallNone, le code affiche une boîte de message qui demande à l'utilisateur s'il souhaite modifier le paramétrage de la propriété. Si l'utilisateur répond « Oui », la propriété a la valeur msoFeatureInstallOnDemand. L’exemple utilise une variable objet nommée MyOfficeApp dimensionnée en tant qu’objet d’application.

 
Dim myofficeapp As Access.Application 
Set myofficeapp = New Access.Application 
 
With MyOfficeApp 
    If .FeatureInstall = msoFeatureInstallNone Then 
        Reply = MsgBox("Uninstalled features for " _ 
            & "this application may " & vbCrLf _ 
            & "cause a run-time error when called." _ 
            & vbCrLf & vbCrLf _ 
            & "Would you like to change this setting" & vbCrLf _ 
            & "to automatically install missing features?", _ 
            vbYesNo, "Feature Install Setting") 
            If Reply = vbYes Then 
                .FeatureInstall = msoFeatureInstallOnDemand 
            End If 
    End If 
End With

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.