Gruppe
Dialog
Problem
Wie kann ich den Blattschutzdialog über VBA aufrufen und den Blattschutz mit oder ohne Kennwort setzen?
StandardModule: basMain
Sub BlattSchutzEin()
Application.Dialogs(xlDialogProtectDocument).Show
End Sub
Sub BlattSchutzAus()
ActiveSheet.Unprotect
End Sub