Ugrás a tartalomra

Hogyan zárolhatjuk és előzetesen védhetjük meg a nem üres cellákat az Excelben?

Tegyük fel, hogy van egy munkalapom, amely néhány üres cellát tölt be az adattartományon belül. Most szeretnék minden adatot zárolni és védeni, és az üres cellákat zárolatlanul hagyni, hogy új értéket adjak meg. Hogyan tudná csak a lehető leghamarabb bezárni és megvédeni a nem üres cellákat az Excelben?

Zárja le és védje meg az összes nem üres cellát a kiválasztott tartományban a Védőlappal

Zárja le és védje meg a használt tartomány összes nem üres celláját VBA kóddal


nyíl kék jobb buborék Zárja le és védje meg az összes nem üres cellát a kiválasztott tartományban a Védőlappal

Normál esetben ezt a munkát az Excelben a következő módszerrel fejezheti be lépésről lépésre:

1. Válassza ki azt a cellatartományt, amelyet zárolni és megvédeni szeretné az adatcellákat, majd kattintson a gombra Kezdőlap > Keresés és kiválasztás > Ugrás a különlegességre, lásd a képernyőképet:

doc lock nem üres cellák 1

2. Az Ugrás a különlegességre párbeszédpanelen válassza ki Üresek tól választ szakasz, lásd a képernyőképet:

doc lock nem üres cellák 2

3. Ezután kattintson OK gombot, és az összes üres cellát kijelölte egyszerre, majd nyomja meg a gombot Ctrl + 1 billentyűk megnyitásához Cellák formázása párbeszédpanel alatt Védelem fülön, törölje a jelet a Zárt opció, lásd a képernyőképet:

doc lock nem üres cellák 3

4. Kattints OK, Majd kattintson a Felülvizsgálat > Védje a lapot, majd írja be és erősítse meg a jelszót szükség szerint, lásd a képernyőképet:

doc lock nem üres cellák 4

5. Kattints OK a párbeszédpanelek bezárásához, és most minden adatcellát védett és csak az üres cellákat hagyja védelem nélkül.


nyíl kék jobb buborék Zárja le és védje meg a használt tartomány összes nem üres celláját VBA kóddal

A fenti módszer több lépésből áll, a lehető leggyorsabb elérés érdekében a következő VBA-kód tehet szívességet, kérjük, tegye a következőket:

1. Tartsa lenyomva a ALT + F11 billentyűk megnyitásához Microsoft Visual Basic for Applications ablak.

2. Ezután kattintson betétlap > Modulok, és illessze be a következő kódot a Modulok Ablak.

VBA kód: Zárolja le és védje meg a munkalap összes nem üres celláját

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. Ezután nyomja meg a gombot F5 kulcs a kód futtatásához, csak a nem üres cellák vannak egyszerre védve a használt tartományban.

A legjobb irodai hatékonyságnövelő eszközök

Népszerű szolgáltatások: Ismétlődések keresése, kiemelése vagy azonosítása   |  Üres sorok törlése   |  Oszlopok vagy cellák kombinálása adatvesztés nélkül   |   Kerek Formula nélkül ...
Szuper keresés: Több kritérium VLookup    Többértékű VLookup  |   VLookup több munkalapon   |   Fuzzy Lookup ....
Speciális legördülő lista: Gyors legördülő lista létrehozása   |  Függő legördülő lista   |  Többszörösen válassza ki a legördülő listát ....
Oszlopkezelő: Adjon meg egy adott számú oszlopot  |  Oszlopok mozgatása  |  Kapcsolja be a Rejtett oszlopok láthatósági állapotát  |  Tartományok és oszlopok összehasonlítása ...
Kiemelt funkciók: Rács fókusz   |  Design nézet   |   Nagy Formula bár    Munkafüzet és lapkezelő   |  Erőforrás-könyvtár (Auto szöveg)   |  Dátumválasztó   |  Kombinálja a munkalapokat   |  Cellák titkosítása/dekódolása    E-mailek küldése listánként   |  Szuper szűrő   |   Speciális szűrő (félkövér/dőlt/áthúzott szűrés...) ...
A 15 legjobb eszközkészlet12 szöveg Eszközök (Szöveg hozzáadása, Karakterek eltávolítása,...)   |   50 + Táblázatos Típusai (Gantt-diagram,...)   |   40+ Praktikus képletek (Számolja ki az életkort a születésnap alapján,...)   |   19 beszúrás Eszközök (Helyezze be a QR-kódot, Kép beszúrása az útvonalból,...)   |   12 Átalakítás Eszközök (Számok szavakig, Valuta átváltás,...)   |   7 Egyesítés és felosztás Eszközök (Haladó kombinált sorok, Hasított sejtek,...)   |   ... és több

Töltsd fel Excel-készségeidet a Kutools for Excel segítségével, és tapasztald meg a még soha nem látott hatékonyságot. A Kutools for Excel több mint 300 speciális funkciót kínál a termelékenység fokozásához és az időmegtakarításhoz.  Kattintson ide, hogy megszerezze a leginkább szükséges funkciót...

kte lap 201905


Az Office lap füles felületet hoz az Office-ba, és sokkal könnyebbé teszi a munkáját

  • Füles szerkesztés és olvasás engedélyezése Wordben, Excelben és PowerPointban, Publisher, Access, Visio és Project.
  • Több dokumentum megnyitása és létrehozása ugyanazon ablak új lapjain, mint új ablakokban.
  • 50% -kal növeli a termelékenységet, és naponta több száz kattintással csökkenti az egér kattintását!
Comments (0)
No ratings yet. Be the first to rate!
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations