Note: The other languages of the website are Google-translated. Back to English
Vpiši se Registracija

Kako uporabiti potrditveno polje za skrivanje ali razkrivanje delovnega lista v Excelu?

Potrditveno polje je uporabna funkcija v Excelu. Tukaj vam bom pokazal, kako uporabite potrditveno polje za skrivanje ali razkrivanje določenega delovnega lista v Excelu.

Uporabite potrditveno polje za skrivanje ali razkrivanje delovnega lista v Excelu

Uporabite potrditveno polje za skrivanje ali razkrivanje delovnega lista v Excelu

Recimo, da imate v delovnem zvezku potrditveno polje z imenom checkbox1. Ko počistite to potrditveno polje, želite, da se določen delovni list samodejno skrije v tem delovnem zvezku in med potrditvijo tega polja razkrije ta delovni list. Prosimo, dosežite to na naslednji način.

1. Odprite delovni list, ki vsebuje potrditveno polje1, z desno miškino tipko kliknite jeziček lista in nato kliknite Ogled kode v meniju z desnim klikom.

Opombe: Med vstavljanjem mora biti potrditveno polje ActiveX.

2. V Ljubljani Microsoft Visual Basic za aplikacije okno, kopirajte in prilepite spodnjo kodo VBA v okno Code. Oglejte si posnetek zaslona:

Koda VBA: Uporabite potrditveno polje za skrivanje ali razkrivanje določenega delovnega lista

Private Sub CheckBox1_Click()
    On Error Resume Next
    ThisWorkbook.Sheets("Sheet5").Visible = CheckBox1.Value
End Sub

Opombe: V kodi je Sheet5 ime delovnega lista, ki ga skrijete ali razkrijete s potrditvenim poljem1. Po potrebi zamenjajte ime delovnega lista.

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

Od zdaj naprej bo pri odstranjevanju potrditvenega polja 1 določeni delovni list »Sheet5« samodejno skrit. To lahko prikažete tako, da potrdite polje. Oglejte si posnetek zaslona:

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 (11)
Ocene še ni. Bodite prvi in ​​ocenite!
Kourtney
Kourtney
Ta komentar je moderator na spletnem mestu minimiziral
Kako naredite več na isti strani? Kako naj potem skrijem list 3 ali 4 s potrditvenim poljem?
Odgovori
0
0
Aitor Hdz
Aitor Hdz     Kourtney
Ta komentar je moderator na spletnem mestu minimiziral
Zasebno pod potrditveno polje1_Klik()
On Error Resume Next
ThisWorkbook.Sheets("DB2018").Visible = CheckBox1.Value
ThisWorkbook.Sheets("V2018").Visible = CheckBox1.Value
ThisWorkbook.Sheets("R2018").Visible = CheckBox1.Value
End Sub
Odgovori
poročilo
0
0
Aitor Hdz
Aitor Hdz
Ta komentar je moderator na spletnem mestu minimiziral
Funciona perfectamente pero, ¿cómo se pueden ocultar varias hojas con el mismo potrditveno polje? Hvala lepa!
Odgovori
poročilo
0
0
Aitor Hdz
Aitor Hdz     Aitor Hdz
Ta komentar je moderator na spletnem mestu minimiziral
Basta con copiar la linea tantas veces como se quiera nombrando la hoja que debe ser ocultada.

Zasebno pod potrditveno polje1_Klik()
On Error Resume Next
ThisWorkbook.Sheets("DB2018").Visible = CheckBox1.Value
ThisWorkbook.Sheets("V2018").Visible = CheckBox1.Value
ThisWorkbook.Sheets("R2018").Visible = CheckBox1.Value
End Sub
Odgovori
poročilo
0
0
Syahrul
Syahrul
Ta komentar je moderator na spletnem mestu minimiziral
Kako skrijem ali razkrijem list z več potrditvenimi polji? Na primer list "MainMenu" je treba skriti, razen če so potrjena potrditvena polja_1, potrditveno polje_2 in potrditveno polje_3.
Odgovori
0
0
jack
jack
Ta komentar je moderator na spletnem mestu minimiziral
Živjo Zelo sem nov pri kontrolnikih ActiveX. Poskušam imeti več potrditvenih polj na enem listu, ki bodo skrila določene liste in ne vseh ali vsakič istega. Ta dva scenarija sta bila moja izkušnja. Kar moram doseči je:
Potrditveno polje1 skrije list2
Potrditveno polje2 skrije list3
Potrditveno polje3 skrije list4
Potrditveno polje4 skrije list5
Potrditveno polje5 skrije list6
Potrditveno polje6 skrije list7
Potrditveno polje7 skrije list8
Potrditveno polje8 skrije list9
Odgovori
0
0
kristal
kristal     jack
Ta komentar je moderator na spletnem mestu minimiziral
Živjo Jack
Samo ponovite kodo in spremenite številke potrditvenih polj in imena listov. Poskusite s spodnjo kodo.

Zasebno pod potrditveno polje1_Klik()

On Error Resume Next

ThisWorkbook.Sheets("Sheet2").Visible = CheckBox1.Value

End Sub

Zasebno pod potrditveno polje2_Klik()

On Error Resume Next

ThisWorkbook.Sheets("Sheet3").Visible = CheckBox2.Value

End Sub

Zasebno pod potrditveno polje3_Klik()

On Error Resume Next

ThisWorkbook.Sheets("Sheet4").Visible = CheckBox3.Value

End Sub

Zasebno pod potrditveno polje4_Klik()

On Error Resume Next

ThisWorkbook.Sheets("Sheet5").Visible = CheckBox4.Value

End Sub

Zasebno pod potrditveno polje5_Klik()

On Error Resume Next

ThisWorkbook.Sheets("Sheet6").Visible = CheckBox5.Value

End Sub

Zasebno pod potrditveno polje6_Klik()

On Error Resume Next

ThisWorkbook.Sheets("Sheet7").Visible = CheckBox6.Value

End Sub

Zasebno pod potrditveno polje7_Klik()

On Error Resume Next

ThisWorkbook.Sheets("Sheet8").Visible = CheckBox7.Value

End Sub

Zasebno pod potrditveno polje8_Klik()

On Error Resume Next

ThisWorkbook.Sheets("Sheet9").Visible = CheckBox8.Value

End Sub
Odgovori
poročilo
0
0
jack
jack     kristal
Ta komentar je moderator na spletnem mestu minimiziral
kristal,
Najlepša hvala ... delovalo je odlično!
Odgovori
0
0
Jed
Jed
Ta komentar je moderator na spletnem mestu minimiziral
Živjo Crystal,
Ali obstaja funkcija, ki bi to obrnila; tj. je list skrit, razen če je odkljukano potrditveno polje?
Odgovori
0
0
Nebo53
Nebo53
Ta komentar je moderator na spletnem mestu minimiziral
Pozdravljeni,
Je cherche à afficher des pages avec des case à cocher. Les Chekbox sont toutes sur la même feuille de calcul.
J'ai copié le premier code et l'ai dupliquer.

Zasebno pod potrditveno polje1_Klik()
On Error Resume Next
ThisWorkbook.Sheets("Eplucher, laver, désinfecter").Visible = CheckBox1.Value
End Sub

Zasebno pod potrditveno polje2_Klik()
On Error Resume Next
ThisWorkbook.Sheets("Tailler fruits et légumes").Visible = CheckBox1.Value
End Sub

Malheureusement, si je ne coche pas la première case ma seconde case ne fonctionne pas. Pourriez-vous m'aider svp
Odgovori
0
0
kristal
kristal     Nebo53
Ta komentar je moderator na spletnem mestu minimiziral
Živjo Sky53,
Zdi se mi, da se nisi spremenil CheckBox1.Value na ustrezno ime potrditvenega polja v drugi kodi VBA.
Spremenite naslednjo vrstico v drugi kodi:
ThisWorkbook.Sheets("Tailler fruits et légumes").Visible = CheckBox1.Value
do
ThisWorkbook.Sheets("Tailler fruits et légumes").Visible = CheckBox2.Value
Odgovori
poročilo
0
0
Tu še ni objavljenih komentarjev
Pustite vaše komentarje
Gost
Objava kot gost
Prijava
×
Ocenite to objavo:
Ponastavi
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