Propriété Application.AutomationSecurity (PowerPoint)
Représente le mode de sécurité que Microsoft PowerPoint utilise lorsqu’il ouvre des fichiers par programme. Lecture-écriture.
Syntaxe
expression. AutomationSecurity
expressionUne variable qui représente un objetApplication.
Valeur renvoyée
MsoAutomationSecurity
Remarques
Cette propriété reçoit automatiquement la valeur msoAutomationSecurityLow au démarrage de l’application. Par conséquent, pour éviter le piratage de solutions s’appuyant uniquement sur le paramètre par défaut, il est conseillé d’attribuer à cette propriété la valeur msoAutomationSecurityLow après avoir ouvert un fichier par programme. De même, pour éviter toute action malveillante, vous devez définir cette propriété immédiatement avant et après avoir ouvert un fichier par programme.
La valeur de la propriété DisplayAlerts ne s’applique pas aux avertissements de sécurité. Par exemple, si l’utilisateur définit la propriété DisplayAlerts comme étant False et la propriété AutomationSecurity avec la valeur msoAutomationSecurityByUI, avec un niveau de sécurité Moyen, alors il y recevra des avertissements de sécurité pendant l’exécution de la macro. Cela permet à la macro d’intercepter les erreurs liées à l’ouverture d’un fichier tout en continuant d’afficher les avertissements de sécurité si l’ouverture du fichier réussit.
La valeur de la propriété AutomationSecurity peut être l’une des constantes MsoAutomationSecurity suivantes.
Constante | Description |
---|---|
msoAutomationSecurityByUI | Utilise le paramètre de sécurité spécifié dans la boîte de dialogue Centre de gestion de la confidentialité. |
msoAutomationSecurityForceDisable | Désactive toutes les macros de tous les fichiers ouverts par programme sans afficher d’alerte de sécurité. |
msoAutomationSecurityLow | Active toutes les macros. Correspond à la valeur par défaut au démarrage de l’application. |
Exemple
Cet exemple montre comment effectuer les opérations suivantes : identifier le paramètre de la sécurité d’automation en cours ; modifier ce paramètre afin de désactiver les macros ; afficher la boîte de dialogue Ouvrir ; réaffecter à la sécurité d’automation son paramètre initial une fois que la présentation sélectionnée a été ouverte.
Sub Security()
Dim secAutomation As MsoAutomationSecurity
secAutomation = Application.AutomationSecurity
Application.AutomationSecurity = msoAutomationSecurityForceDisable
Application.FileDialog(msoFileDialogOpen).Show
Application.AutomationSecurity = secAutomation
End Sub
Voir aussi
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.