Ինչպե՞ս Excel- ում արգելափակել և կանխարգելել անթափոն բջիջները:

Ենթադրելով, որ ես ունեմ մի աշխատաթերթ, որը լրացնում է որոշ դատարկ բջիջներ տվյալների տիրույթում, այժմ ես ուզում եմ կողպել և պաշտպանել բոլոր տվյալների բջիջները, իսկ դատարկ բջիջները թողնել ապակողպված ՝ ինչ-որ նոր արժեք մուտքագրելու համար: Ինչպե՞ս կարող եք Excel- ում հնարավորինս արագ արգելափակել և պաշտպանել անթափանց խցերը:

Պաշտպանեք թերթիկով կողպեք և պաշտպանեք ընտրված տիրույթում գտնվող բոլոր դատարկ բջիջները

Կողպեք և պաշտպանեք բոլոր դատարկ բջիջները օգտագործված տիրույթում ՝ VBA կոդով

---

Պաշտպանեք թերթիկով կողպեք և պաշտպանեք ընտրված տիրույթում գտնվող բոլոր դատարկ բջիջները

Սովորաբար, Excel- ում այս գործը կարող եք ավարտել հետևյալ մեթոդով քայլ առ քայլ.

1, Ընտրեք բջիջների տիրույթը, որը ցանկանում եք կողպել և պաշտպանել տվյալների բջիջները, այնուհետև կտտացրեք Գլխավոր > Գտեք և ընտրեք > Գնալ հատուկ, տես նկարի նկարը.

2, Մեջ Գնալ հատուկ երկխոսության տուփ, ընտրեք Բլիթներ - ից ընտրել բաժին, տես նկարի նկարը.

3. Այնուհետեւ կտտացրեք OK կոճակը, և բոլոր դատարկ բջիջները միանգամից ընտրվել են, ապա սեղմել Ctrl + 1 բացել ստեղները Ձևաչափել բջիջները երկխոսության տուփ, տակ Պաշտպանություն նիշք, նշեք այն կողպված տարբերակը, տես նկարի նկարը.

4: Սեղմեք OK, ապա սեղմեք տեսություն > Պաշտպանեք Թերթիկը, ապա մուտքագրեք և հաստատեք գաղտնաբառը, որքան անհրաժեշտ է, տեսեք,

5: Սեղմեք OK երկխոսությունները փակելու համար, և այժմ տվյալների բոլոր բջիջները պաշտպանված են և դատարկ բջիջները թողնում են անպաշտպան:

---

Կողպեք և պաշտպանեք բոլոր դատարկ բջիջները օգտագործված տիրույթում ՝ VBA կոդով

Վերոնշյալ մեթոդը ունի մի քանի քայլ, դրան հնարավորինս արագ հասնելու համար, հետևյալ VBA կոդը կարող է ձեզ լավություն բերել, խնդրում եմ արեք հետևյալ կերպ.

1, Պահեք պահեք ALT + F11 բացել ստեղները Microsoft Visual Basic հավելվածների համար պատուհան.

2. Այնուհետեւ կտտացրեք Տեղադրել > Մոդուլներ, և տեղադրեք հետևյալ կոդը Մոդուլներ Պատուհանը:

VBA կոդ. Կողպեք և պաշտպանեք բոլոր անթափոն բջիջները աշխատանքային թերթում

Sub UnlockEmptyCells()
'Updateby Extendoffice
    Application.ScreenUpdating = False
    Cells.Locked = True
    Selection.SpecialCells(xlCellTypeBlanks).Locked = False
    ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True
    Application.ScreenUpdating = True
End Sub

3, Եվ հետո սեղմեք F5 Այս կոդը գործարկելու բանալին, օգտագործվող տիրույթում միանգամից պաշտպանվում են միայն ոչ դատարկ բջիջները: