Application.AutomationSecurity-Eigenschaft (Word)

Dient zum Zurückgeben oder Festlegen einer MsoAutomationSecurity-Konstante , die die Sicherheitseinstellung darstellt, die Microsoft Word beim programmgesteuerten Öffnen von Dateien verwendet. .

Syntax

expression. AutomationSecurity

Ausdruck: Erforderlich. Eine Variable, die ein Application -Objekt darstellt.

HinwBemerkungeneise

Die Standardeinstellung der AutomationSecurity-Eigenschaft ist msoAutomationSecurityLow. Um ein Ändern der Sicherheitseinstellungen des Benutzers zu vermeiden oder um keine Lösungen zu gefährden, die von der Standardeinstellung ausgehen, sollten Sie beim Zurücksetzen dieser Eigenschaft auf die ursprüngliche Einstellung nach dem programmatischen Öffnen einer Datei vorsichtig vorgehen.

Das Festlegen von ScreenUpdating auf False wirkt sich nicht auf Warnungen aus und wirkt sich nicht auf Sicherheitswarnungen aus. Die Einstellung DisplayAlerts gilt nicht für Sicherheitswarnungen. Wenn z. B. in der mittleren Sicherheitseinstellung für den Benutzer DisplayAlerts auf False und AutomationSecurity auf msoAutomationSecurityByUI festgelegt wird, werden beim Ausführen des Makros Warnmeldungen angezeigt. Dies ermöglicht es dem Makro, Fehler beim Öffnen von Dateien abzufangen, während es dennoch die Sicherheitswarnung anzeigt, wenn die Datei erfolgreich geöffnet wird.

Beispiel

Dieses Beispiel ändert die Einstellung zum Deaktivieren von Makros, zeigt das Dialogfeld Öffnen an und setzt dann die Werte der AutomationSecurity-Eigenschaft auf die ursprünglichen Werte zurück.

Sub Security() 
 Dim lngAutomation As MsoAutomationSecurity 
 
 With Application 
 lngAutomation = .AutomationSecurity 
 .AutomationSecurity = msoAutomationSecurityForceDisable 
 With .FileDialog(msoFileDialogOpen) 
 .Show 
 .Execute 
 End With 
 .AutomationSecurity = lngAutomation 
 End With 
 
End Sub

Siehe auch

Application-Objekt

Support und Feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.