Microsoft Excel

Excel und VBA: Formeln, Programmierung, Lösungen

Die Excel/VBA-Beispiele

Bewerten Sie hier bitte das Excel-Portal
Home Zurück Vor
Download Beispiel-Arbeitsmappe

Thema

Blattschutzdialog über VBA aufrufen

Gruppe

Anwendung

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