Sisukord:

VBA kood lukustatud Exceli lehe avamiseks: 4 sammu
VBA kood lukustatud Exceli lehe avamiseks: 4 sammu

Video: VBA kood lukustatud Exceli lehe avamiseks: 4 sammu

Video: VBA kood lukustatud Exceli lehe avamiseks: 4 sammu
Video: 4️⃣3️⃣➖✅ЭКСПОРТИРОВАТЬ ВЫБРАННЫЙ ЛИСТ В EXCEL ▶ EXCEL VBA(VISUAL BASIC ДЛЯ ПРИЛОЖЕНИЙ)🔶 2024, Detsember
Anonim
VBA kood lukustatud Exceli lehe avamiseks
VBA kood lukustatud Exceli lehe avamiseks
VBA kood lukustatud Exceli lehe avamiseks
VBA kood lukustatud Exceli lehe avamiseks

Kui olete kunagi unustanud mõne oma Exceli töölehe parooli, teate, kui masendav see võib olla. Selles juhendis kasutatud kood on üks lihtsamaid, mille olen leidnud. See loob kasutatava koodi, mis avab teie kaitstud lehe. Ma ei saa koodi eest krediiti võtta, kuna leidsin selle lihtsalt vajaduse hetkel (ja ma ei leia enam seda kohta, kus see sait on) … nii et ma ei aita palju, kui see teie jaoks ei tööta, kuid olen mul oli sellega edu ja arvasin, et jagan.

Samm: avage VBA

Avage VBA
Avage VBA

Avage tööleht, millele unustasite oma parooli. Makroredaktorisse sisenemiseks kasutage klahve Alt+F11. Kui olete VBA -s topeltklõpsake lehte, mille peate vasakul asuvast menüüloendist avama. See avab lehe ülddeklaratsioonide lehe.

Samm: lõigake ja kleepige koodilõhkuja

Lõika ja kleepige koodimurdja
Lõika ja kleepige koodimurdja

Sisestage allolev kood ülddeklaratsioonide lehele, mille olete avanud. Te ei pea midagi muutma, lehe nime jne … Lihtsalt lõigake ja kleepige. k IntegerDim l täisarvuna, m täisarvuna, n täisarvuna Dim i1 täisarvuna, i2 täisarvuna, i3 täisarvuna Dim i4 täisarvuna, i5 täisarvuna, i6 täisarvuna tõrke korral Jätka järgmisena i = 65 kuni 66: jaoks j = 65 kuni 66: k = 65 kuni 66 l = 65 kuni 66: m = 65 kuni 66: i1 = 65 kuni 66 i2 = 65 kuni 66: i3 = 65 kuni 66: i4 = 65 jaoks 66 -le i5 = 65 kuni 66: i6 = 65 kuni 66: n = 32 kuni 126 ActiveSheet. Kaitske Chr (i) & Chr (j) & Chr (k) & _ Chr (l) & Chr (m) & Chr (i1) & Chr (i2) & Chr (i3) & _Chr (i4) & Chr (i5) & Chr (i6) & Chr (n) Kui ActiveSheet. ProtectContents = False Siis MsgBox "Üks kasutatav parool 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) Välju alaotsast Kui järgmine: järgmine: järgmine: järgmine: järgmine: järgmine järgmine: järgmine: järgmine: järgmine: järgmine: järgmine lõpp alam _

Samm: käivitage makro

Käivitage makro
Käivitage makro

Kui kood on lisatud, käivitage makro, valides VBA redaktori ekraani ülaosas menüükaardiribalt Käivita või vajutage lihtsalt klahvi F5

Samm: kasutage loodud koodi

Kasutage loodud koodi
Kasutage loodud koodi
Kasutage loodud koodi
Kasutage loodud koodi
Kasutage loodud koodi
Kasutage loodud koodi

Makro naaseb töölehele, mille kaitse soovite tühistada. Ilmub hoiatusstiili kast koos kasutatava koodiga. Klõpsake menüükaardil Ülevaade nuppu Tühista leht. Sisestage loodud kood parooliks ja olete valmis. Teie leht peaks olema lukustamata! Seda võimsust peaksite targalt ja vastutustundlikult kasutama ainult oma töölehtede avamiseks.

Soovitan: