ActiveSheet.Unprotect ("ende")
Sheets("A").Select
ActiveSheet.Unprotect ("ende")
Sheets("B").Select
ActiveSheet.Unprotect ("3ende").....
.... Sheets(Array("A", "B", "C", "D", "E")).Select....
Vielen Dank!
Frank
ActiveSheet.Unprotect ("ende")
Sheets("A").Select
ActiveSheet.Unprotect ("ende")
Sheets("B").Select
ActiveSheet.Unprotect ("3ende").....
.... Sheets(Array("A", "B", "C", "D", "E")).Select....
Vielen Dank!
Frank
du kannst die Sheets mit dem Index ansprechen:
Sheets(1).Unprotect ("ende")
oder mit Schleife
For i = 1 To Sheets.Count
Sheets(i).Unprotect ("ende")
Next i
Gruß
Steffen D
Bye
Nike
was soll uns dieser Beitrag sagen???
Vielleicht ist dies ein Ansatz
Gruß Hajo
Sheets("A").Select
A ist der Name von dem Tabellenblatt.
Sheets("Tabelle11").Select
MUSS gehen, wenn es blatt mit Namen Tabelle11 gibt
Alternative kannst Du
Sheets(3).Select
benutzen. Das ist das 3. Blatt