{"id":356,"date":"2019-01-03T10:37:01","date_gmt":"2019-01-03T09:37:01","guid":{"rendered":"http:\/\/www.robert-kofler.at\/?p=356"},"modified":"2019-01-03T15:49:27","modified_gmt":"2019-01-03T14:49:27","slug":"ms-excel-blattschutz-aufheben","status":"publish","type":"post","link":"https:\/\/www.robert-kofler.at\/Blog\/2019\/01\/03\/ms-excel-blattschutz-aufheben\/","title":{"rendered":"MS Excel &#8211; Blattschutz aufheben"},"content":{"rendered":"\n<p>Man hat ein (MS) Excel Dokument vor sich und m\u00f6chte gerne etwas daran \u00e4ndern. Leider hat ist das Dokument mit einem Kennwort gesch\u00fctzt und das Kennwort hat man nat\u00fcrlich vergessen &#8211; was nun?<br>Mittels eines kleinen Macro l\u00e4sst sich der Blattschutz in wenigen Klicks und ohne besondere Kenntnisse oder Hacking Skills aufheben und man kann das Dokument wieder editieren.&nbsp;<\/p>\n\n\n\n<!--more-->\n\n\n\n<p>Wir erstellen ein kleines Makro, welches das Passowort mittels einer Brute Force Attacke &#8222;err\u00e4t&#8220;. Das geht in wenigen Schritten.<\/p>\n\n\n\n<ul><li>Das Excel Dokument \u00f6ffnen. <\/li><li>Tastenkombination Alt + F11 dr\u00fccken<\/li><li>Im sich \u00f6ffnenden Men\u00fc mit der rechten Maustaste auf &#8222;Diese Arbeitsmappe&#8220; klicken und dann auf &#8222;Einf\u00fcgen&#8220; und &#8222;Modul&#8220;.<\/li><li>Im Fenster &#8222;Modul1&#8220; folgenden Text kopieren:<\/li><\/ul>\n\n\n\n<pre class=\"wp-block-code\"><code>Sub SchutzEntfernen()\nOn Error Resume Next\nFor i = 65 To 66: For j = 65 To 66\nFor k = 65 To 66: For l = 65 To 66\nFor m = 65 To 66: For n = 65 To 66\nFor o = 65 To 66: For p = 65 To 66\nFor q = 65 To 66: For r = 65 To 66\nFor s = 65 To 66: For t = 32 To 126\nActiveSheet.Unprotect Chr(i) &amp; _\nChr(j) &amp; Chr(k) &amp; Chr(l) &amp; _\nChr(m) &amp; Chr(n) &amp; Chr(o) &amp; _\nChr(p) &amp; Chr(q) &amp; Chr(r) &amp; _\nChr(s) &amp; Chr(t)\nNext t: Next s: Next r: Next q\nNext p: Next o: Next n: Next m\nNext l: Next k: Next j: Next i\nMsgBox \"Blattschutz abgeschaltet\"\nEnd Sub<\/code><\/pre>\n\n\n\n<ul><li>&nbsp;Das Fenster &#8222;Microsoft Visual Basic&#8220; schlie\u00dfen.<\/li><li>Die Tastenkombination Alt + F8 dr\u00fccken und das eben erstellte&nbsp; &#8222;SchutzEntfernen&#8220; ausf\u00fchren<\/li><li><\/li><\/ul>\n\n\n\n<p>Ist die Tabelle mit einem kurzen Kennwort gesch\u00fctzt, dauert der Vorgang nur wenige Sekunden. Bei sehr langen und komplexen Kennw\u00f6rtern kann es deutlich l\u00e4nger dauern.&nbsp;<\/p>\n\n\n\n<ul><li>Sobald &#8222;Blattschutz abgeschaltet&#8220; erscheint, kann man auf &#8222;OK&#8220; klicken und das Excel Dokument ohne Blattschutz speichern.<\/li><\/ul>\n\n\n\n<p>gefunden bei:&nbsp;<a href=\"http:\/\/ulrichhanke.de\/MicrosoftTipps\/Excel-Blattschutz_entfernen.html\">http:\/\/ulrichhanke.de<\/a><\/p>\n","protected":false},"excerpt":{"rendered":"<p>Man hat ein (MS) Excel Dokument vor sich und m\u00f6chte gerne etwas daran \u00e4ndern. Leider hat ist das Dokument mit einem Kennwort gesch\u00fctzt und das Kennwort hat man nat\u00fcrlich vergessen &#8211; was nun?Mittels eines kleinen Macro l\u00e4sst sich der Blattschutz in wenigen Klicks und ohne besondere Kenntnisse oder Hacking Skills aufheben und man kann das &hellip; <a href=\"https:\/\/www.robert-kofler.at\/Blog\/2019\/01\/03\/ms-excel-blattschutz-aufheben\/\" class=\"more-link\"><span class=\"screen-reader-text\">\u201eMS Excel &#8211; Blattschutz aufheben\u201c<\/span> weiterlesen<\/a><\/p>\n","protected":false},"author":1,"featured_media":363,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":[],"categories":[1],"tags":[40,39,41,42],"amp_enabled":true,"_links":{"self":[{"href":"https:\/\/www.robert-kofler.at\/Blog\/wp-json\/wp\/v2\/posts\/356"}],"collection":[{"href":"https:\/\/www.robert-kofler.at\/Blog\/wp-json\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/www.robert-kofler.at\/Blog\/wp-json\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/www.robert-kofler.at\/Blog\/wp-json\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"https:\/\/www.robert-kofler.at\/Blog\/wp-json\/wp\/v2\/comments?post=356"}],"version-history":[{"count":7,"href":"https:\/\/www.robert-kofler.at\/Blog\/wp-json\/wp\/v2\/posts\/356\/revisions"}],"predecessor-version":[{"id":365,"href":"https:\/\/www.robert-kofler.at\/Blog\/wp-json\/wp\/v2\/posts\/356\/revisions\/365"}],"wp:featuredmedia":[{"embeddable":true,"href":"https:\/\/www.robert-kofler.at\/Blog\/wp-json\/wp\/v2\/media\/363"}],"wp:attachment":[{"href":"https:\/\/www.robert-kofler.at\/Blog\/wp-json\/wp\/v2\/media?parent=356"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/www.robert-kofler.at\/Blog\/wp-json\/wp\/v2\/categories?post=356"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/www.robert-kofler.at\/Blog\/wp-json\/wp\/v2\/tags?post=356"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}