Schutz prüfen 19.11.2007 11:29:00 Walter Guten Morgen, hiermit wollte ich prüfen ob Schutz drin ist: If ActiveSheet.Unprotect(getStrPasswort) = False Then MsgBox "Sie müssen erst Schutz aufheben" Else ActiveSheet.Range("A10").Select End If klappt nicht, mfg Walter
AW: Schutz prüfen 19.11.2007 11:32:10 Andi Hi, mit If ActiveSheet.ProtectContents = True / False kannst Du abfragen, ob ein Blattschutz gesetzt ist. Schönen Gruß, Andi