Blattschutz

Forumthread: Blattschutz

Blattschutz

Jemy

Guten Tag
Gibt es eine Möglichkeit, den Blattschutz einer Excel-Mappe zu entfernen?
Danke für die Tipps.
Gruss Jemy

2
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Benutzer

AW: Blattschutz

Dirk
AW: Blattschutz

Bruno

AW: Blattschutz

06.07.2011 13:12:09

Dirk

Hallo!
Sheets(1).unprotect "DeinPassword"
Voila!
Dirk aus Dubai

AW: Blattschutz

10.07.2011 22:09:30

Bruno

Hallo Dirk,
schau dir mal diesen Code an

Sub Blattschutz_Entfernen()
On Error Resume Next
For i = 65 To 66
For j = 65 To 66
For k = 65 To 66
For l = 65 To 66
For m = 65 To 66
For n = 65 To 66
For o = 65 To 66
For p = 65 To 66
For q = 65 To 66
For r = 65 To 66
For s = 65 To 66
For t = 32 To 126
ActiveSheet.Unprotect Chr(i) & Chr(j) & Chr(k) & Chr(l) & Chr(m) & _
Chr(n) & Chr(o) & Chr(p) & Chr(q) & Chr(r) & Chr(s) & Chr(t)
Next t
Next s
Next r
Next q
Next p
Next o
Next n
Next m
Next l
Next k
Next j
Next i
MsgBox "Nun müsste es geklappt haben!"
MsgBox "Überprüfe es jetzt mal!"
End Sub

Gruß
Bruno

Forumthread: Blattschutz

2 Beiträge zum Forumthread Beiträge zu diesem Forumthread

VBA Beispiele zu diesem und ähnlichen Themen

2
Beiträge zum Forumthread

Beiträge zu diesem Forumthread