{"id":3963,"date":"2019-04-19T03:00:00","date_gmt":"2019-04-19T00:00:00","guid":{"rendered":"http:\/\/vahamartti.fi\/blog\/?p=3963"},"modified":"2019-12-22T02:04:34","modified_gmt":"2019-12-21T23:04:34","slug":"excel-taulukon-suojauksen-poistaminen","status":"publish","type":"post","link":"http:\/\/vahamartti.fi\/blog\/?p=3963","title":{"rendered":"Excel taulukon suojauksen poistaminen"},"content":{"rendered":"\n

V\u00e4lill\u00e4 vastaan tulee Excel-tiedostoja, joiden sis\u00e4lt\u00f6 on suojattu siten, ett\u00e4 kenttien laskentakaavoja ei n\u00e4e, ja ett\u00e4 vain tiettyjen kenttien sis\u00e4lt\u00f6\u00e4 voi muokata. <\/p>\n\n\n\n

T\u00e4llaiselle suojaamiselle on hyv\u00e4t perusteet, esimerkiksi matkalaskulomakkeessa. K\u00e4ytt\u00e4j\u00e4n tarvitsee t\u00e4ytt\u00e4\u00e4 tietyt kent\u00e4t, eik\u00e4 muuhun tarvitse koskea. Suojaus est\u00e4\u00e4 tahattomien muutosten tekemisen, kun kaikkien kenttien sis\u00e4lt\u00f6\u00e4 ei p\u00e4\u00e4se muokkaamaan.<\/p>\n\n\n\n

Syyst\u00e4 tai toisesta, edellisen ty\u00f6paikan k\u00e4ytt\u00e4m\u00e4n kirjanpitotoimiston toimittamissa matkalaskulomakkeissa oli ainakin kahtena eri vuonna virheit\u00e4. Esimerkiksi matkustajan kilometrit laskettiin t\u00e4ysin v\u00e4\u00e4rin (summattiin eri p\u00e4ivien matkustajam\u00e4\u00e4r\u00e4t yhteen, sama tehtiin kilometreille, ja n\u00e4iden lopputulos kerrottiin kesken\u00e4\u00e4n). V\u00e4lill\u00e4 lomakkeissa oli k\u00e4yt\u00f6ss\u00e4 v\u00e4\u00e4r\u00e4t kilometrikorvaus tai p\u00e4iv\u00e4raha summat. Lomakkeet eiv\u00e4t my\u00f6sk\u00e4\u00e4n taipuneet ulkomaanp\u00e4iv\u00e4rahoihin.<\/p>\n\n\n\n

N\u00e4in keskener\u00e4ist\u00e4 ja testaamatonta tekelett\u00e4, josta pyydet\u00e4\u00e4n viel\u00e4 rahaa, ei koskaan pit\u00e4isi p\u00e4\u00e4st\u00e4\u00e4 ulos. Vaikka lomakkeessa oli virheit\u00e4, oli se muutoin kuitenkin ihan asiallinen. Lomake j\u00e4i k\u00e4ytt\u00f6\u00f6n, vaikka tilitoimisto vaihtui. T\u00e4llaista lomaketta pystyy k\u00e4ytt\u00e4m\u00e4\u00e4n vain vuoden loppuun, sill\u00e4 verottaja p\u00e4ivitt\u00e4\u00e4 korvauksien suuruuksia vuosittain.<\/p>\n\n\n\n

Vastaavan lomakkeen voisi tehd\u00e4 helposti itsekin, mutta pelkkien eurojen p\u00e4ivitt\u00e4misen takia t\u00e4m\u00e4 tuntuu v\u00e4h\u00e4n turhalta.<\/p>\n\n\n\n

Pienell\u00e4 p\u00e4tk\u00e4ll\u00e4 Visual Basic -koodia, on mahdollista ’selvitt\u00e4\u00e4’ salasana, jolla taulukon suojauksen saa poistettua. VB koodi ei murra alkuper\u00e4ist\u00e4 salasanaa, se vain etsii sellaisen merkkijonon, joka toimii suojauksen poistamiseen. T\u00e4ll\u00e4 tavoin selvitetyt koodit ovat kirjaimellisesti muotoa AAAAAAAAAAA, AAAAAAABBBB, AAAABBBBBCC jne. <\/p>\n\n\n\n

Excelin lukitus ei siis ole mik\u00e4\u00e4n hienostunein. T\u00e4ten Excelill\u00e4 ei kannata tehd\u00e4 mit\u00e4\u00e4n Top Secret juttuja, mik\u00e4li tarkoituksena on my\u00f6s jaella tiedostoa.<\/p>\n\n\n\n

Salasanan selvitt\u00e4minen<\/strong><\/p>\n\n\n\n

Alla oleva koodi ei ole itseni keksim\u00e4, vaan se l\u00f6ytyy monesta paikkaa internetin sy\u00f6vereist\u00e4. <\/p>\n\n\n\n

Koodin k\u00e4ytt\u00f6 tapahtuu seuraavasti:<\/p>\n\n\n\n

1. Avaa VBA editori painamalla Alt + F11 avonaisessa Excel-asiakirjassa, jonka taulun suojauksen haluat poistaa.<\/p>\n\n\n\n

2. Tupla klikkaa taulukkoa ikkunan vasemmalla laidalla, jonka suojauksen haluat poistaa. T\u00e4ss\u00e4 esimerkiss\u00e4 poistetaan Taulun 11 suojaus. Suojauksen poistaminen t\u00e4ll\u00e4 metodilla pit\u00e4\u00e4 tehd\u00e4 jokaiselle taululle erikseen.<\/p>\n\n\n\n

\"\"<\/figure>\n\n\n\n

3. Lis\u00e4\u00e4 alla oleva koodi oikealle puolelle avautuneeseen ikkunaan<\/p>\n\n\n\n

Sub Passwordbreaker()\nDim i As Integer, j As Integer, k As Integer\nDim l As Integer, m As Integer, n As Integer\nDim il As Integer, i2 As Integer, i3 As Integer\nDim i4 As Integer, i5 As Integer, i6 As Integer\nOn Error Resume Next\nFor i = 65 To 66: For j = 65 To 66: For k = 65 To 66\nFor l = 65 To 66: For m = 65 To 66: For il = 65 To 66\nFor i2 = 65 To 66: For i3 = 65 To 66: For i4 = 65 To 66\nFor i5 = 65 To 66: For i6 = 65 To 66: For n = 32 To 126\nActiveSheet.Unprotect Chr(i) & Chr(j) & Chr(k) & _\nChr(l) & Chr(m) & Chr(il) & Chr(i2) & Chr(i3) & _\nChr(i4) & Chr(i5) & Chr(i6) & Chr(n)\nIf ActiveSheet.ProtectContents = False Then\nMsgBox \"One usable password is \" & Chr(i) & Chr(j) & _\nChr(k) & Chr(l) & Chr(m) & Chr(il) & Chr(i2) & _\nChr(i3) & Chr(i4) & Chr(i5) & Chr(i6) & Chr(n)\nExit Sub\nEnd If\nNext: Next: Next: Next: Next: Next\nNext: Next: Next: Next: Next: Next\nEnd Sub<\/code><\/pre>\n\n\n\n
4. Koodin lis\u00e4\u00e4misen j\u00e4lkeen, paina vihre\u00e4\u00e4 ’play’ painiketta (tai paina F5). Pian t\u00e4m\u00e4n j\u00e4lkeen ilmestyy salasana, jota voi k\u00e4ytt\u00e4\u00e4 asiakirjan suojauksen poistamiseen.<\/p>\n\n\n\n
\"\"<\/figure>\n\n\n\n
Suojauksen poistaminen<\/strong><\/p>\n\n\n\n
Asiakirjan suojaus poistetaan valitsemalla Tarkista => Poista taulukon suojaus, ja sy\u00f6tt\u00e4m\u00e4ll\u00e4 salasanakent\u00e4n \u00e4sken saatu salasana.<\/p>\n\n\n\n
Huomaathan, ett\u00e4 t\u00e4m\u00e4 VB -koodi t\u00e4ytyy suorittaa jokaiselle taululle erikseen. Esimerkkitiedostossa on 13 taulua, joten koodi pit\u00e4\u00e4 ajaa kullekin taululle salasanan selvitt\u00e4miseksi, ja viel\u00e4 erikseen poistaa suojaukset kultakin taululta l\u00f6ytynytt\u00e4 salasanaa k\u00e4ytt\u00e4en.<\/p>\n\n\n\n
PS. Mik\u00e4li t\u00e4m\u00e4 kikka ei toiminut (syyst\u00e4 tai toisesta v\u00e4lill\u00e4 n\u00e4in k\u00e4y), voit kokeilla my\u00f6s toista tapaa<\/a>.<\/p>\n","protected":false},"excerpt":{"rendered":"
V\u00e4lill\u00e4 vastaan tulee Excel-tiedostoja, joiden sis\u00e4lt\u00f6 on suojattu siten, ett\u00e4 kenttien laskentakaavoja ei n\u00e4e, ja ett\u00e4 vain tiettyjen kenttien sis\u00e4lt\u00f6\u00e4 voi muokata. T\u00e4llaiselle suojaamiselle on hyv\u00e4t perusteet, esimerkiksi matkalaskulomakkeessa. K\u00e4ytt\u00e4j\u00e4n tarvitsee t\u00e4ytt\u00e4\u00e4 tietyt kent\u00e4t, eik\u00e4 muuhun tarvitse koskea. Suojaus est\u00e4\u00e4 tahattomien muutosten tekemisen, kun kaikkien kenttien sis\u00e4lt\u00f6\u00e4 ei p\u00e4\u00e4se muokkaamaan. Syyst\u00e4 tai toisesta, edellisen ty\u00f6paikan … Jatka lukemista Excel taulukon suojauksen poistaminen<\/span> →<\/span><\/a><\/p>\n","protected":false},"author":1,"featured_media":0,"comment_status":"open","ping_status":"closed","sticky":false,"template":"","format":"standard","meta":{"_crdt_document":"","_monsterinsights_skip_tracking":false,"_monsterinsights_sitenote_active":false,"_monsterinsights_sitenote_note":"","_monsterinsights_sitenote_category":0,"jetpack_post_was_ever_published":false,"_jetpack_newsletter_access":"","_jetpack_dont_email_post_to_subs":false,"_jetpack_newsletter_tier_id":0,"_jetpack_memberships_contains_paywalled_content":false,"_jetpack_memberships_contains_paid_content":false,"footnotes":"","jetpack_publicize_message":"","jetpack_publicize_feature_enabled":true,"jetpack_social_post_already_shared":true,"jetpack_social_options":{"image_generator_settings":{"template":"highway","default_image_id":0,"font":"","enabled":false},"version":2}},"categories":[30,384],"tags":[981,985,984,1013,986,1012,982],"class_list":["post-3963","post","type-post","status-publish","format-standard","hentry","category-saatoa","category-vinkit","tag-excel","tag-lukittu","tag-salasana","tag-solu","tag-suojattu","tag-suojaus","tag-taulukko"],"jetpack_publicize_connections":[],"jetpack_featured_media_url":"","jetpack_shortlink":"https:\/\/wp.me\/p1fteB-11V","jetpack_sharing_enabled":true,"jetpack-related-posts":[],"_links":{"self":[{"href":"http:\/\/vahamartti.fi\/blog\/index.php?rest_route=\/wp\/v2\/posts\/3963","targetHints":{"allow":["GET"]}}],"collection":[{"href":"http:\/\/vahamartti.fi\/blog\/index.php?rest_route=\/wp\/v2\/posts"}],"about":[{"href":"http:\/\/vahamartti.fi\/blog\/index.php?rest_route=\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"http:\/\/vahamartti.fi\/blog\/index.php?rest_route=\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"http:\/\/vahamartti.fi\/blog\/index.php?rest_route=%2Fwp%2Fv2%2Fcomments&post=3963"}],"version-history":[{"count":14,"href":"http:\/\/vahamartti.fi\/blog\/index.php?rest_route=\/wp\/v2\/posts\/3963\/revisions"}],"predecessor-version":[{"id":4113,"href":"http:\/\/vahamartti.fi\/blog\/index.php?rest_route=\/wp\/v2\/posts\/3963\/revisions\/4113"}],"wp:attachment":[{"href":"http:\/\/vahamartti.fi\/blog\/index.php?rest_route=%2Fwp%2Fv2%2Fmedia&parent=3963"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"http:\/\/vahamartti.fi\/blog\/index.php?rest_route=%2Fwp%2Fv2%2Fcategories&post=3963"},{"taxonomy":"post_tag","embeddable":true,"href":"http:\/\/vahamartti.fi\/blog\/index.php?rest_route=%2Fwp%2Fv2%2Ftags&post=3963"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}