Vpiši se  \/ 
x
or
x
Registracija  \/ 
x

or

Kako skriti ali razkriti ukazni gumb na podlagi določene vrednosti celice v Excelu?

Recimo, da z ukaznim gumbom na svojem delovnem listu sprožite skript VBA. Kadar skript VBA v nekaterih primerih ni uporabljen, morate narediti ukazni gumb skrit, namesto da bi bil prikazan na delovnem listu. In ga spet prikažite, ko je potreben skript VBA. Ta članek govori o skrivanju ali prikazovanju ukaznega gumba, ki temelji na določeni vrednosti celice v Excelu. Naredite naslednje.

Skrijte ali razkrijte ukazni gumb na podlagi določene vrednosti celice s kodo VBA


Skrijte ali razkrijte ukazni gumb na podlagi določene vrednosti celice s kodo VBA


Spodnjo kodo VBA lahko zaženete, da skrijete ali razkrijete ukazni gumb na podlagi določene vrednosti celice v Excelu.

1. Z desno miškino tipko kliknite zavihek lista, ki vsebuje ukazni gumb, ki ga želite prikazati skriti, nato kliknite Ogled kode v meniju z desnim klikom.

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

Koda VBA: skrije ali razkrije ukazni gumb na podlagi določene vrednosti celice

Private Sub Worksheet_Change(ByVal Target As Range)
    Application.ScreenUpdating = False
    If Cells(1, 1).Value <> "1" Then
        Me.CommandButton1.Visible = True
    Else
        Me.CommandButton1.Visible = False
    End If
    Application.ScreenUpdating = True
End Sub

Opombe: v kodi, Celice (1, 1), 1 in CommandButton1 označite, da bo CommandButton1 skrit, ko celica A1 vsebuje številko 1, in prikazan, če celica A1 vsebuje druge vrednosti, razen številke 1. Glejte spodnji posnetek zaslona. In jih lahko spremenite glede na vaše potrebe.


Sorodni članki:


Najboljša orodja za pisarniško produktivnost

Kutools za Excel rešuje večino vaših težav in poveča 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-2019 in 365. Podpira vse jezike. Preprosta namestitev v vašem podjetju ali organizaciji. Vse funkcije 30-dnevnega brezplačnega preskusa. 60-dnevno jamstvo za vračilo 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 z miško!
dno pisarniške mize
Say something here...
symbols left.
You are guest
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    Et41 · 1 years ago
    Hello

    I am new to VBA, I have put this code into a new Excel. One CommnadButton, on Sheet1 but the code doesnt work.

    Do I have to do anything before this?


    Thanks in Advance
  • To post as a guest, your comment is unpublished.
    Jeremy · 1 years ago
    Use the ActiveX Control Button.
  • To post as a guest, your comment is unpublished.
    Bryce · 2 years ago
    I've put this code in and entered my button name (Finish), referenced the reference cell (P11 - 16, 11) but every time I make a change to the reference cell (P11) I get a compile error and it highlights the ".Finish" section of the code, seemingly meaning the button name I entered "Finish" is not found on the worksheet. I've confirmed, both in the drop down area to the left of the formula bar and in the "define name" area on the Formula tab that my button name is, in fact, "Finish", but it still does not work.


    Any help?
    • To post as a guest, your comment is unpublished.
      crystal · 2 years ago
      Hi Bryce,
      I changed the button name to "Finish" in my worksheet, and it works well without any error displaying.
      Do you mind testing the code in a new blank workbook?
      Thank you for your comment.
  • To post as a guest, your comment is unpublished.
    sebastian · 2 years ago
    hola que tal, tengo un boton con macro, que me devuelve a una hoja 'menu', pero no quiero que ese boton aparezca en la hoja menu como le puedo hacer?'


    saludos.-