In den Blättern sollen nur nicht gesperrte Zellen ausgewählt werden können.
Nun die Frage: Kann ich mehrere Blätter gleichzeitig in einem Schritt schützen?
bis jetzt musste ich jedes blatt nacheinander einzeln mit kennwort schützen.
vielen Dank!
Sub Blätter_schützen()
For sh = 1 To Sheets.Count
Sheets(sh).Protect
Next sh
End Sub
Sub Blätter_entschützen()
For sh = 1 To Sheets.Count
Sheets(sh).Unprotect
Next sh
End Sub
Sub schütz()
'alle Blätter schützen
Dim ws As Worksheet
For Each ws In Worksheets
ws.Protect Password:="abc"
Next ws
End Sub
Problemstellung
Wie kann ich das Suchen auf mehrere oder alle Tabellenblätter erweitern?
Problemstellung
In einem Blatt habe ich 4 Schaltflächen, die alle mit demselben Makro verknüpft sind. Wie greife ich innerhalb des Makros auf den Namen der aufrufenden Schalterfläche zu?
Problemstellung
Wie muß eine benutzerdefinierte Funktion aussehen, die eine SVERWEIS()-Suche über mehrere Bereiche durchführt?
Problemstellung
Wie kann ich in XL8 Bereiche aus mehreren Arbeitsblättern auf eine Druckseite zusammenfassen?
Problemstellung
Wie kann ich den AutoFilter in einem Zug über mehrere Arbeitsblätter setzen?
Problemstellung
Wie kann ich die Daten aus mehreren Tabellenblättern auf einem Druckblatt sammeln?
Problemstellung
Wie kann ich die Werte in mehreren Spalten sortieren?
Problemstellung
Wie kann ich eine feste Anzahl von Zeilen in einer Spalte auf mehrere Spalten mit einer festgelegten Seitenlänge verteilen?