Propiedad Application.FeatureInstall (Access)

Use la propiedad FeatureInstall para especificar o determinar cómo Controla Microsoft Access las llamadas a métodos y propiedades que requieren características que aún no están instaladas. MsoFeatureInstall de lectura y escritura.

Sintaxis

expresión. FeatureInstall

expresión Variable que representa un objeto Application.

Comentarios

Cuando el código VBA hace referencia a un objeto que no está instalado, la tecnología microsoft Installer intentará instalar la característica necesaria. La propiedad FeatureInstall se utiliza para controlar qué ocurre cuando se hace referencia a un objeto no instalado. Cuando esta propiedad está establecida en su valor predeterminado, cualquier intento de utilizar un objeto no instalado hará que la tecnología del Instalador trate de instalar la función solicitada. En algunas circunstancias, este proceso puede tardar tiempo, y el usuario puede creer que la máquina dejó de responder a los comandos.

Puede establecer la propiedad FeatureInstall en msoFeatureInstallOnDemandWithUI para que los usuarios puedan ver que sucede algo a medida que se instala la característica. También puede establecer la propiedad FeatureInstall en msoFeatureInstallNone si desea interceptar el error devuelto y mostrar su propio cuadro de diálogo al usuario o realizar otra acción personalizada.

Si tiene la propiedad UserControl establecida en False, no se pedirá a los usuarios que instalen nuevas características aunque la propiedad FeatureInstall esté establecida en msoFeatureInstallOnDemand. Si la propiedad UserControl se establece en True, aparecerá un indicador de progreso de la instalación si la propiedad FeatureInstall se establece en msoFeatureInstallOnDemand.

Ejemplo:

En este ejemplo se comprueba el valor de la propiedad FeatureInstall. Si la propiedad está establecida en msoFeatureInstallNone, el código muestra un cuadro de mensaje que pregunta al usuario si desea cambiar el valor de la propiedad. Si el usuario responde "Sí", la propiedad se establece en msoFeatureInstallOnDemand. En el ejemplo se usa una variable de objeto denominada MyOfficeApp que se dimensiona como un objeto de aplicación.

 
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

Soporte técnico y comentarios

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.