Thema: Blattschutzdialog über VBA aufrufen

Home

Gruppe

Dialog

Problem

Wie kann ich den Blattschutzdialog über VBA aufrufen und den Blattschutz mit oder ohne Kennwort setzen?

Lösung

Geben Sie den nachfolgenden Code in ein Standardmodul ein und weisen Sie ihn einer Schaltfläche zu.

StandardModule: basMain

Sub BlattSchutzEin()
   Application.Dialogs(xlDialogProtectDocument).Show
End Sub

Sub BlattSchutzAus()
   ActiveSheet.Unprotect
End Sub

Beiträge aus dem Excel-Forum zu den Themen Dialog und Anwendung

Laufzeitfehler 1004: Anwendungs- oder objektorient	xlDialogInsertHyperlink.show
Arbeitmappen über Dialogfeld zusammen fassen	5.0 Dialog
Speichern unter Dialog in Word aufrufen inkl. Pfad	Druckerdialog
Dateityp im "Speichern unter"-Dialog vorgeben	Makro stoppen, wenn Excel-Dialog?
Exel immer in neuer Anwendung öffnen	xlDialogOpen anpassen
Klick in definierten Rangebereich startet Dialog	anwendungen öffnen
xlDialogOpen bei Excel 2007 funzt nicht	FileDialog inkl. Anklicken von Desktop, Eigene D.
Grösse Dialogfenster der InputBox	VBA Anwendung schließen
Beliebige Anwendung in VBA schließen	Dialogfeld unterdrücken
Dialog "permanently delete sheets" unterbinden	Format-Dialog funktioniert nicht mehr
Dialog "Verknüpfung aktualisieren"	Ordnerdialog und Dateidialog
Ordnerdialog und dateidialog	Ordnerdialog und Dateidialog
Filedialog	AW: Fertige Anwendungen/Formulare
Herber/Beispiele/Dialoge/Checkbox/137601	Fertige Anwendungen/Formulare.
Bilder bei Click im Dialogfeld	Anwendungs- oder objektori. Fehler
Suchdialog über VBA aufrufen	mit Wert aus Combobox Dialog öffnen
Diagramm als Grafik mit Speicherdialog exportieren	Dialogfenster zum kopieren
FileDialog-Objekt unter O2k	Laufende Anwendung ermitteln und beenden
Laufzeitfehler 1004, Anwendungs und obj.	Abrage von Dialogfeldargumenten
eine datei in anwendung	Datei Auswählen Dialog (Application.FileDialog)
Diagramme in Vektorformat für andere Anwendungen?	xlDialogOpen/FindFile ohne Open
Dialogfeld zum pdf öffnen	Dialogfeld schließen, wenn Benutzer nichts eingibt
Nur eine Mappe pro Anwendung	Problem mit ApplicationDialogs
Anwendung im Vordergrund	Das Dialogfeld "sortieren" aufrufen?
Keine Dialogbox bei SaveAs	Dialogbox