Sisällysluettelo:
2025 Kirjoittaja: John Day | [email protected]. Viimeksi muokattu: 2025-01-13 06:57
Jos olet unohtanut salasanasi jollekin Excel -laskentataulukollesi, tiedät kuinka turhauttavaa se voi olla. Tässä ohjeessa käytetty koodi on yksi yksinkertaisimmista mitä olen löytänyt. Se luo käyttökelpoisen koodin, joka avaa suojatun arkin lukituksen. En voi hyväksyä koodia, koska löysin sen vain hätätilanteessa (enkä enää löydä, missä sivusto on) … joten en voi olla paljon apua, jos se ei toimi sinulle, mutta olen menestyi sen kanssa ja ajattelin jakaa.
Vaihe 1: Avaa VBA
Avaa laskentataulukko, johon unohdat salasanasi. Siirry makroeditoriin näppäinyhdistelmällä Alt+F11. Kun olet VBA: ssa, kaksoisnapsauta avattavaa taulukkoa vasemmalla olevasta valikosta, jolloin arkin yleiset ilmoitussivut avautuvat.
Vaihe 2: Leikkaa ja liitä koodinjakaja
Lisää alla oleva koodi avaamaasi yleisten ilmoitusten sivulle. Sinun ei tarvitse muuttaa mitään, arkin nimeä jne.… Leikkaa ja liitä. _ Sub PasswordBreaker () 'Breaks -laskentataulukon salasanasuojaus. k IntegerDim l Kokonaislukuna, m Kokonaislukuna, n Kokonaislukuna Dim i1 Kokonaislukuna, i2 kokonaislukuna, i3 Kokonaislukuna Dim i4 kokonaislukuna, i5 kokonaislukuna, i6 kokonaislukuna Virhe Jatka seuraavaksi i = 65-66: j = 65 - 66: k = 65 - 66 l = 65 - 66: m = 65 - 66: i1 = 65 - 66 I2 = 65 - 66: i3 = 65 - 66: i4 = 65 To 66 For i5 = 65 to 66: for i6 = 65 to 66: for n = 32 to 126 ActiveSheet. Poista suojaus Chr (i) & Chr (j) & Chr (k) & _ Chr (l) & Chr (m) & Chr (i1) & Chr (i2) & Chr (i3) & _Chr (i4) & Chr (i5) & Chr (i6) & Chr (n) Jos ActiveSheet. ProtectContents = False Sitten MsgBox "Yksi käytettävissä oleva salasana on" & Chr (i) & Chr (j) & _ Chr (k) & Chr (l) & Chr (m) & Chr (i1) & Chr (i2) & _ Chr (i3) & Chr (i4) & Chr (i5)) & Chr (i6) & Chr (n) Poistu alipäästä Jos seuraava: Seuraava: Seuraava: Seuraava: Seuraava: Seuraava Seuraava: Seuraava: Seuraava: Seuraava: Seuraava: Seuraava loppu Ala _
Vaihe 3: Suorita makro
Kun koodi on lisätty, suorita makro valitsemalla VBA -editorinäytön yläreunan valikkopalkista Suorita tai painamalla F5
Vaihe 4: Käytä luotua koodia
Makro palauttaa sinut laskentataulukkoon, jonka suojauksen haluat poistaa. Näyttöön tulee hälytystyyliruutu, jossa on käyttökelpoinen koodi. Napsauta Tarkista -valikon välilehdessä Poista suojaus. Arkkisi tulee avata! Käytä tätä voimaa viisaasti ja vastuullisesti vain omien laskentataulukoidesi lukituksen avaamiseen.