Excel Blattschutz - Dokumentenschutz - aufheben, aushebeln - 016
Quelle: YouTube
Excel Blattschutz aufheben, weil ihr EUER Kennwort dazu vergessen habt!
Folgede Pkt. beachten:
*****************************
1) In der ExcelMappe Alt+F11 drücken,
2) DieseArbeitsmappe anwählen und
"Neues Modul" anlegen,
3) Folgendes Script einfügen:
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
4) Schließen und in ExcelMappe zurückkehren,
5) Alt+F8 anwählen und dann das Marko starten,
6) Etwas warten und MessageBox bestätigen.
Fertig!!!
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Bei Problemen, Fragen oder Vorschlägen... KOMMENTIEREN, BEWERTEN und ABONNIEREN.
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
FOLGE MIR AUF TWITTER: http://twitter.com/htp4all
|
ODER: http://youtube.com/htp4all
|
WEITERE INFOS UNTER: http://htp4all.de
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
"VIDEO-VORSCHLÄGE ? oder THEMEN-WÜNSCHE ?"
Hinterlasse ein Kanalkommentar ;)
Suchbegriffe für Excel Blattschutz - Dokumentenschutz - aufheben, aushebeln - 016
