Mundarija:
- 1 -qadam: VBA -ni oching
- 2 -qadam: Kodni o'chirgichni kesib, joylashtiring
- 3 -qadam: Makroni ishga tushiring
- 4 -qadam: Yaratilgan koddan foydalaning
Video: Qulflangan Excel varag'i qulfini ochish uchun VBA kodi: 4 qadam
2024 Muallif: John Day | [email protected]. Oxirgi o'zgartirilgan: 2024-01-30 13:27
Agar siz Excel ish jadvallaringizdan birining parolini unutgan bo'lsangiz, bu qanchalik asabiylashishi mumkinligini bilasiz. Ushbu yo'riqnomada ishlatiladigan kod men topgan eng oddiy kodlardan biri. Bu sizning himoyalangan varaqni qulfini ochadigan foydali kodni yaratadi. Men kod uchun kredit ololmayman, chunki men uni faqat bir lahzada topdim (va men saytni boshqa topa olmayapman) … shuning uchun agar u siz uchun ishlamasa, men ko'p yordam berolmayman. Men bu borada muvaffaqiyat qozondim va u bilan baham ko'rishni o'yladim.
1 -qadam: VBA -ni oching
Parolni unutgan ishchi varaqni oching. Makro muharririga kirish uchun Alt+F11 tugmalarini bosing VBA -da bir marta chap tugmachaning menyusidan ochish kerak bo'lgan varaqni ikki marta bosing.
2 -qadam: Kodni o'chirgichni kesib, joylashtiring
Quyidagi kodni ochilgan umumiy deklaratsiyalar sahifasiga kiriting. Siz hech narsani o'zgartirmasligingiz kerak, varaq nomi va hk … Faqat kesib oling va joylashtiring._ Parolni buzish () "Parol himoyasini buzadi. k IntegerDim l Integer sifatida, m Butun son sifatida, n Integer sifatida Dim i1 Butun sifatida, i2 Butunlik sifatida, i3 Butun son sifatida Dim i4 Butun sifatida, i5 Butun sifatida, i6 Butun son sifatida Xato davom etganda Keyingi i = 65 dan 66 gacha: uchun j = 65dan 66gacha: k = 65dan 66gacha l = 65dan 66gacha: m = 65dan 66gacha: i1 = 65dan 66gacha i2 = 65dan 66gacha: i3 = 65dan 66gacha: i4 = 65 uchun I5 = 65 dan 66 gacha: i6 = 65 dan 66 gacha: n = 32 dan 126 gacha ActiveSheet uchun. Chr (i) & Chr (j) va Chr (k) & _ Chr (l) & Chr (m) ni himoya qilmang. & Chr (i1) & Chr (i2) & Chr (i3) & _Chr (i4) & Chr (i5) & Chr (i6) & Chr (n) ActiveSheet. ProtectContents = False Keyin MsgBox "Birgina ishlatiladigan parol" va Chr (i) & Chr (j) & _ Chr (k) & Chr (l) & Chr (m) & Chr (i1) & Chr (i2) & _ Chr (i3) & Chr (i4) & Chr (i5)) & Chr (i6) & Chr (n) Sub Enddan chiqish Agar Keyingi: Keyingi: Keyingi: Keyingi: Keyingi: Keyingi: Keyingi: Keyingi: Keyingi: Keyingi: Keyingi: Keyingi: Keyingi: Keyingi Oxirgi _
3 -qadam: Makroni ishga tushiring
Kod qo'shilgandan so'ng, VBA muharriri ekranining yuqori qismidagi menyu yorlig'idan Ishga tushirish -ni tanlang yoki oddiy F5 tugmachasini bosib, Makro -ni ishga tushiring.
4 -qadam: Yaratilgan koddan foydalaning
Makro sizni himoya qilmoqchi bo'lmagan ish sahifasiga qaytaradi. Foydalanish mumkin bo'lgan kod bilan ogohlantirish uslubi oynasi paydo bo'ladi. "Ko'rib chiqish" menyusida "Himoyalanmagan varaq" ni bosing. Yaratilgan kodni parol sifatida kiriting. Sizning varaqingiz qulfdan chiqarilishi kerak! Siz bu kuchdan oqilona va mas'uliyat bilan faqat o'z ish varaqalaringizni ochish uchun foydalanishingiz kerak.
Tavsiya:
Rfid va Blynk taymerining qulfini ochish bilan tugun Mcu hind avtomobilining markaziy qulfi: 9 qadam
Rfid va Blynk taymer qulfini ochish bilan tugunli Mcu hind avtomobilining markaziy qulfi: Bugun men sizga hind uslubidagi avtomashinani to'liq avtomatik avtomatlashtirilgan rfid tagli blynk wifi boshqaruvi va vaqtni qulfini ochishni ko'rsataman. U ham oddiy markaziy qulfning barcha xususiyatlariga ega. markaziy qulf ONLINE FAOLIYATNI TARMOQ QILISHNI TALAB ETADI
Velosiped qulfini ochish haqida ogohlantirish tizimi: 15 qadam
Velosiped qulfini ochish haqida ogohlantirish tizimi: Salom hammaga … Qandaysiz? Hammangizning uyingizda transport vositalari bor. Avtomobil xavfsizligi hamma uchun muhim. Men shunga o'xshash loyiha bilan qaytdim. Ushbu loyihada men GSM Module va Arduino yordamida velosiped qulfini ochish haqida ogohlantirish tizimini yaratdim. Velosiped qulfini ochganda
Miniatyura taqiladigan qulflangan kuchaytirgich (va kiyiladigan kiyimlar uchun Sonar tizimi va boshqalar): 7 qadam
Miniatyura taqiladigan qulflash kuchaytirgichi (va kiyinadigan kiyimlar uchun Sonar tizimi va boshqalar): Ko'zoynak ramkalariga joylashtiriladigan va ko'rlar uchun sonar ko'rish tizimini yoki oddiy ultratovushli miniatyurali arzon qulflash kuchaytirgichini yarating. sizning yuragingizni doimiy ravishda kuzatib boradigan va odamni ogohlantirish uchun Human-Machine Learning-dan foydalanadigan mashina
Arduino RFID qulfini ochish Mac (Linux va Win): 3 qadam
Arduino RFID qulfini ochish Mac (Linux va Win): Menda macbook pro bor, menda ham katta noutbuk bor. Mac to'xtaganda, men tizimni ochish uchun ruxsatnoma yozaman. Oddiy kunda men parolni 100 marta raqamlayman. Endi men yechimni topdim! RFID TAG! Men Arduino -dan foydalanaman
Windows kompyuterini RFID yordamida qulflash/qulfini ochish: 7 qadam (rasmlar bilan)
Windows -ni RFID yordamida qulflash/qulfini ochish. Salom! Siz har safar kompyuter/noutbuk qulfini ochish uchun parolni yozishdan charchadingizmi? Men uni har kuni bir necha marta qulflashga odatlanganman va hech narsa parolni/pinni yozib qo'yishdan ko'ra bezovta qilmaydi