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

Kako zakleniti in odkleniti določene celice s potrditvenim poljem v Excelu?

Ta članek govori o uporabi potrditvenega polja za zaklepanje in odklepanje vrste določenih celic v Excelu.

Zaklenite in odklenite določene celice s potrditvenim poljem s kodo VBA


Zaklenite in odklenite določene celice s potrditvenim poljem s kodo VBA

Spodnji skript VBA vam lahko pomaga odkleniti ali zakleniti vrsto določenih celic, ko potrdite ali počistite potrditveno polje na delovnem listu. Naredite naslednje.

1. Najprej morate s potrditvenim poljem določiti ime obsega celic, ki jih morate zakleniti in odkleniti.

Tu izberem obseg A1: A14, vnesite ime LockRng v Ime in pritisnite na Vnesite tipko. Oglejte si posnetek zaslona:

2. Na delovnem listu je potrditveno polje, s katerim boste zaklenili in odklenili celice, z desno miškino tipko kliknite jeziček Sheet in nato kliknite Ogled kode v meniju z desnim klikom.

Opombe: Med vstavljanjem mora biti potrditveno polje ActiveX.

3. V pojavnem oknu Microsoft Visual Basic za aplikacije okno, kopirajte in prilepite spodnjo kodo VBA v Koda okno.

Koda VBA: s kljukico zaklenite ali odklenite vrsto določenih celic

Private Sub CheckBox1_Click()
    Range("LockRng").Select
    On Error Resume Next
    If CheckBox1.Value = True Then
        Selection.Locked = Fals
        MsgBox "Range cells " & Selection.Address & " has been unlocked", vbInformation, "Kutools for Excel"
    Else
        Selection.Locked = True
        MsgBox "Range cells " & Selection.Address & " has been locked", vbInformation, "Kutools for Excel"
    End If
End Sub

Opombe: V kodi je Checkbox1 ime potrditvenega polja, LockRng je ime določene celice obsega. Lahko jih spremenite po potrebi.

4. Pritisnite druga + Q tipke hkrati, da zaprete tipko Microsoft Visual Basic za aplikacije okno.

Zdaj lahko preizkusite kodo. Ko počistite potrditveno polje, a Kutools za Excel Pojavi se pogovorno okno s sporočilom, da je določen obseg zaklenjen, kliknite OK gumb.

Med potrditvijo potrditvenega polja bodo vse celice v določenem obsegu odklenjene in dobili boste Kutools za Excel pogovorno okno, kot je prikazano spodaj desno.


Sorodni članki:


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 (0)
Ocene še ni. Bodite prvi in ​​ocenite!
Tu še ni objavljenih komentarjev
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