Propiedad Application.AutomationSecurity (PowerPoint)
Representa el modo de seguridad que Microsoft PowerPoint usa cuando se abren archivos mediante programación. Lectura y escritura.
Sintaxis
expresión. AutomationSecurity
expresión Variable que representa un objeto Application.
Valor devuelto
MsoAutomationSecurity
Comentarios
Esta propiedad se establece automáticamente en msoAutomationSecurityLow cuando se inicia la aplicación. Por tanto, para evitar la interrupción de las soluciones que se basan en la configuración predeterminada, debe tener cuidado restablecer esta propiedad como msoAutomationSecurityLow después de abrir un archivo mediante programación. Además, para evitar daños malintencionados, debe establecer esta propiedad inmediatamente antes y después de abrir un archivo mediante programación.
El valor de la propiedad DisplayAlerts no se aplica a las advertencias de seguridad. Por ejemplo, si el usuario establece la propiedad DisplayAlerts en False y la propiedad AutomationSecurity en msoAutomationSecurityByUI, mientras el usuario está en el nivel de seguridad medio, habrá advertencias de seguridad mientras se ejecuta la macro. Esto permite que la macro interceptar los errores de archivo abierto mientras sigue mostrándose la advertencia si el archivo correctamente en apertura de seguridad.
El valor de la propiedad AutomationSecurity puede ser una de estas constantes MsoAutomationSecurity.
| Constante | Descripción |
|---|---|
| msoAutomationSecurityByUI | Usa la configuración de seguridad especificada en el cuadro de diálogo Centro de confianza. |
| msoAutomationSecurityForceDisable | Deshabilita todas las macros en todos los archivos abiertos mediante programación sin mostrar ninguna alerta de seguridad. |
| msoAutomationSecurityLow | Habilita todas las macros. Valor predeterminado al iniciar la aplicación. |
Ejemplo:
En este ejemplo, se captura la configuración de seguridad automática actual, se modifica la configuración para deshabilitar las macros, se muestra el cuadro de diálogo Abrir y, después de abrirse la presentación seleccionada, se restablece la configuración original de seguridad de automatización.
Sub Security()
Dim secAutomation As MsoAutomationSecurity
secAutomation = Application.AutomationSecurity
Application.AutomationSecurity = msoAutomationSecurityForceDisable
Application.FileDialog(msoFileDialogOpen).Show
Application.AutomationSecurity = secAutomation
End Sub
Vea también
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.