Note: The other languages of the website are Google-translated. Back to English

Kako obnoviti izgubljeno geslo za zaščito delovnega lista v Excelu?

Vedno nastavimo gesla, da zaščitimo nekatere pomembne delovne liste, da jih drugi ne uničijo ali spremenijo. Če pa pozabite gesla, kako bi to lahko storili? Na srečo Excel podpira nekaj kode VBA za obnovitev izgubljenega gesla za zaščito delovnega lista. S to težavo se lahko spoprimete takole:

Obnovite izgubljeno geslo za zaščito delovnega lista v Excelu s kodo VBA
Več vadnice za zaščito delovnega lista ...


Obnovite izgubljeno geslo za zaščito delovnega lista v Excelu s kodo VBA

Naslednja koda VBA vam lahko pomaga pri hitrem preklicu prvotnih gesel na delovnem listu.

1. Odprite svoj že zaščiteni delovni list.

2. Držite tipko ALT + F11 in odpre tipko Okno Microsoft Visual Basic for Applications.

3. Kliknite Vstavi > Moduliin prilepite naslednjo kodo v Okno modula.

Koda VBA: obnovite izgubljeno geslo za zaščito delovnega lista

Sub PasswordRecovery()
Dim i As Integer, j As Integer, k As Integer
Dim l As Integer, m As Integer, n As Integer
Dim i1 As Integer, i2 As Integer, i3 As Integer
Dim i4 As Integer, i5 As Integer, i6 As Integer
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 i1 = 65 To 66
For i2 = 65 To 66: For i3 = 65 To 66: For i4 = 65 To 66
For i5 = 65 To 66: For i6 = 65 To 66: For n = 32 To 126
ActiveSheet.Unprotect Chr(i) & Chr(j) & Chr(k) & _
Chr(l) & Chr(m) & Chr(i1) & Chr(i2) & Chr(i3) & _
Chr(i4) & Chr(i5) & Chr(i6) & Chr(n)
If ActiveSheet.ProtectContents = False Then
MsgBox "One usable password is " & Chr(i) & Chr(j) & _
Chr(k) & Chr(l) & Chr(m) & Chr(i1) & Chr(i2) & _
Chr(i3) & Chr(i4) & Chr(i5) & Chr(i6) & Chr(n)
Exit Sub
End If
Next: Next: Next: Next: Next: Next
Next: Next: Next: Next: Next: Next
End Sub

4. Nato kliknite F5 tipko za zagon te kode in pojavilo se bo pozivno polje, kliknite OK da ga zaprete, in gesla zaščitenega delovnega lista bodo takoj preklicana.

Opombe:

1. S to kodo naenkrat obnovite samo eno geslo za zaščito delovnega lista. Če je zaščitenih delovnih listov več, morate to kodo uporabiti enega za drugim.
2. Zgornja koda prihaja iz http://excelzoom.com/2009/08/how-to-recover-lost-excel-passwords/.


Preprosto zaščitite več delovnih listov hkrati z geslom v Excelu:

O Zaščitite delovne liste uporabnost Kutools za Excel vam lahko pomaga zaščititi več delovnih listov v velikem obsegu z istim geslom. Zagotavlja tudi pripomoček za istočasno zaščito teh delovnih listov. Prenesite celotno funkcijo 30-dnevna brezplačna sled Kutools za Excel zdaj!


Sorodni članki

Kako zaščititi več delovnih listov hkrati v Excelu?

Kako odstraniti zaščito več delovnih listov hkrati v Excelu?


Najboljša orodja za pisarniško produktivnost

Kutools za Excel rešuje večino vaših težav in poveča vašo produktivnost za 80%

  • Ponovna uporaba: Hitro vstavite zapletene formule, grafikoni in vse, kar ste že uporabljali; Šifriraj celice z geslom; Ustvari poštni seznam in pošiljanje e-pošte ...
  • Vrstica Super Formula (enostavno urejanje več vrstic besedila in formule); Bralna postavitev (enostavno branje in urejanje velikega števila celic); Prilepite v filtrirani obseg...
  • Združi celice / vrstice / stolpce brez izgube podatkov; Vsebina razdeljenih celic; Združi podvojene vrstice / stolpce... prepreči podvojene celice; Primerjaj obsege...
  • Izberite Duplicate ali Unique Vrstice; Izberite prazne vrstice (vse celice so prazne); Super Find in Fuzzy Find v mnogih delovnih zvezkih; Naključna izbira ...
  • Natančna kopija Več celic brez spreminjanja sklica formule; Samodejno ustvarjanje referenc na več listov; Vstavi oznake, Potrditvena polja in še več ...
  • Izvleček besedila, Dodaj besedilo, Odstrani po položaju, Odstrani presledek; Ustvari in natisni vmesne seštevke strani Pretvarjanje med vsebino celic in komentarji...
  • Super filter (shranite in uporabite sheme filtrov za druge liste); Napredno razvrščanje glede na mesec / teden / dan, pogostost in drugo; Poseben filter s krepko, ležeče ...
  • Združite delovne zvezke in delovne liste; Spoji tabele na podlagi ključnih stolpcev; Razdelite podatke na več listov; Paketna pretvorba xls, xlsx in PDF...
  • Več kot 300 zmogljivih funkcij. Podpira Office / Excel 2007-2021 in 365. Podpira vse jezike. Enostavna uvedba v vašem podjetju ali organizaciji. 30-dnevna brezplačna preizkusna različica vseh funkcij. 60-dnevna garancija vračila denarja.
zavihek kte 201905

Kartica Office prinaša vmesnik z zavihki v Office in poenostavi vaše delo

  • Omogočite urejanje in branje z zavihki v Wordu, Excelu, PowerPointu, Publisher, Access, Visio in Project.
  • Odprite in ustvarite več dokumentov v novih zavihkih istega okna in ne v novih oknih.
  • Poveča vašo produktivnost za 50%in vsak dan zmanjša na stotine klikov miške za vas!
dno pisarniške mize
Komentarji (98)
Ocene še ni. Bodite prvi in ​​ocenite!
Ta komentar je moderator na spletnem mestu minimiziral
Pri Excelu 2013 mi obnovitev uspešnosti ni delovala
Ta komentar je moderator na spletnem mestu minimiziral
Hvala!!! Deluje v redu z 2007 office
Ta komentar je moderator na spletnem mestu minimiziral
Odlično!!!!!!!!! deluje dobro.
Ta komentar je moderator na spletnem mestu minimiziral
Enostavna rešitev. Še en primer "znanje je moč!" Hvala, ker delite svoje znanje in opolnomočite druge!
Ta komentar je moderator na spletnem mestu minimiziral
Deloval brezhibno. Znanje je moč, hvala, ker delite svoje znanje in opolnomočite druge!
Ta komentar je moderator na spletnem mestu minimiziral
Spoštovana ekipa Po vaših besedah ​​sem to storil in rešil svojo težavo, toda druga težava je, da imam Excelov list, v katerem je en list zaščiten z geslom in ko pritisnem Alt+F11 in izberem možnost Vstavi, je možnost Moudle onemogočena, tako kako lahko pridobi ga. Prosim predlagajte mi.
Ta komentar je moderator na spletnem mestu minimiziral
Deloval kot čar v Excelu 2013!!! Najboljši ste, hvala!
Ta komentar je moderator na spletnem mestu minimiziral
najlepša hvala!! meni je delovalo...
Ta komentar je moderator na spletnem mestu minimiziral
Hvala Chacha G (Google)
Ta komentar je moderator na spletnem mestu minimiziral
Najlepša hvala za pomoč, skoraj obupajte prej, dokler nisem preizkusil vaše metode, deluje takoj, hvala še enkrat
Ta komentar je moderator na spletnem mestu minimiziral
Odprl sem datoteko, ki sem jo želel odstraniti, in zahteval sem, da vnesem geslo. Držal sem tipke Alt+F11 in zatemnil je zaslon mojega računalnika. Nikoli nisem presegel te točke.
Ta komentar je moderator na spletnem mestu minimiziral
Uporabljam Microsoft Excel 2007 in ko sem odprl zaščiteno datoteko, je zahteval geslo, ki sem ga pozabil. Ko hkrati držim Alt + F11, se zaslon zatemni in nikoli nisem presegel te točke.
Ta komentar je moderator na spletnem mestu minimiziral
Zelo uporabne in pravočasne informacije. Hvala.
Ta komentar je moderator na spletnem mestu minimiziral
deluje..... Najlepša hvala :-)
Ta komentar je moderator na spletnem mestu minimiziral
Ne morem se vam dovolj zahvaliti za vašo prijazno pomoč. Najboljše želje.
Ta komentar je moderator na spletnem mestu minimiziral
Kolikšen je približno čas delovanja za to? Moj stroj je obtičal za nekaj časa 30 minut.
Ta komentar je moderator na spletnem mestu minimiziral
Čudovito. Ti si genij
Ta komentar je moderator na spletnem mestu minimiziral
Čudovito! Hvala za pomoč!
Ta komentar je moderator na spletnem mestu minimiziral
Super!!! Zelo pomagalo :lol:
Ta komentar je moderator na spletnem mestu minimiziral
Hvala podpora. Svet IOT resnično spreminja naša življenja. Hvala vam!
Tu še ni objavljenih komentarjev
Obremenitev Več
Pustite vaše komentarje
Objava kot gost
×
Ocenite to objavo:
0   Znaki
Predlagane lokacije

Sledi nam

Copyright © 2009 - www.extendoffice.com. | Vse pravice pridržane. Poganja ga ExtendOffice. | Kazalo
Microsoft in logotip Office sta blagovni znamki ali registrirani blagovni znamki družbe Microsoft Corporation v ZDA in / ali drugih državah.
Zaščiteno s Sectigo SSL