Ինչպե՞ս օգտագործել վանդակը ՝ Excel- ում աշխատաթերթը թաքցնելու կամ ցուցադրելու համար:

Նշման վանդակը օգտակար հատկություն է Excel- ում: Այստեղ ես ձեզ ցույց կտամ, թե ինչպես օգտագործել վանդակը ՝ Excel- ում նշված աշխատանքային թերթը թաքցնելու կամ ցուցադրելու համար:

Օգտագործեք վանդակը ՝ Excel- ում աշխատաթերթը թաքցնելու կամ չթաքցնելու համար

Օգտագործեք վանդակը ՝ Excel- ում աշխատաթերթը թաքցնելու կամ չթաքցնելու համար

Amazարմանալի! Օգտագործելով արդյունավետ ներդիրներ Excel- ում, ինչպիսիք են Chrome- ը, Firefox- ը և Safari- ն:

Խնայեք ձեր ժամանակի 50% -ը և ամեն օր կրճատեք մկնիկի հազարավոր կտտոցներ ձեզ համար:

Ենթադրելով, որ ձեր աշխատանքային գրքում ունեք նշատուփ 1 անունով նշման տուփ: Այս վանդակը ապանշելիս ուզում եք, որ որոշակի աշխատանքային թերթ ինքնաբերաբար թաքցվի այս աշխատանքային գրքում, իսկ վանդակը ստուգելիս ցուցիչը հանեք: Խնդրում եմ դրան հասնել հետևյալ կերպ.

1. Բացեք աշխատաթերթը պարունակում է Ստուգիչ 1-ը, աջ կտտացրեք թերթիկի ներդիրին և այնուհետև կտտացրեք Դիտել կոդը աջ կտտացնելու ցանկից:

ՆշումՏեղադրելու ժամանակ վանդակը պետք է լինի ActiveX վանդակը:

2. Մեջ Microsoft Visual Basic հավելվածների համար պատուհանը, խնդրում ենք պատճենել և կպցնել ներքևի VBA կոդը օրենսգրքի պատուհանում: Տեսեք,

VBA կոդ. Նշված աշխատանքային թերթը թաքցնելու կամ ցուցադրելու համար օգտագործեք վանդակը

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

Նշում. Կոդում, Sheet5- ը աշխատանքային թերթիկի անունն է, որը դուք կթաքցնեք կամ ապակողմնորոշեք checkbox1- ով: Խնդրում ենք փոխարինել աշխատանքային թերթի անվանումը ՝ ըստ ձեզ անհրաժեշտ:

3. Մամուլ ալտ + Q ստեղները միաժամանակ փակելու համար Microsoft Visual Basic հավելվածների համար պատուհան.

Այսուհետ, վանդակը 1-ը չեղարկելիս, նշված «Sheet5» սահմանված աշխատանքային թերթը ինքնաբերաբար կթաքցվի: Եվ դա կարող եք ցույց տալ ՝ նշելով վանդակը: Տեսեք,

Առնչվող հոդվածներ:

Գրասենյակի արտադրողականության լավագույն գործիքները

Excel- ի համար նախատեսված Kutools- ը լուծում է ձեր խնդիրների մեծ մասը և բարձրացնում ձեր արտադրողականությունը 80% -ով

Վերաօգտագործել: Արագ տեղադրեք բարդ բանաձևեր, գծապատկերներ և այն ամենը, ինչ դուք նախկինում օգտագործել եք. Ryածկագրել բջիջները գաղտնաբառով; Ստեղծեք փոստային ցուցակ և նամակներ ուղարկել ...
Super Formula Bar (հեշտությամբ խմբագրեք տեքստի և բանաձևի բազմաթիվ տողեր); Ընթերցանության դասավորությունը (հեշտությամբ կարդալ և խմբագրել մեծ թվով բջիջներ); Տեղադրել ֆիլտրացված տիրույթում...
Միաձուլել բջիջները / տողերը / սյունակները առանց տվյալների կորստի. Պառակտված բջիջների պարունակությունը; Միավորել կրկնօրինակ տողերը / սյունակները... Կանխել կրկնօրինակ բջիջները; Համեմատեք միջակայքերը...
Ընտրեք Կրկնօրինակ կամ Եզակի Շարքեր; Ընտրեք դատարկ շարքեր (բոլոր բջիջները դատարկ են); Super Find և Fuzzy Find շատ աշխատանքային գրքույկներում; Պատահական ընտրություն ...
Actշգրիտ պատճեն Բազմաթիվ բջիջներ ՝ առանց բանաձևի հղումը փոխելու; Ավտոմատ ստեղծեք հղումներ դեպի մի քանի թերթեր; Տեղադրեք փամփուշտներ, Տուփեր և ավելին ...
Քաղվածք տեքստ, Տեքստ ավելացնել, հեռացնել ըստ դիրքի, Հեռացնել տարածությունը; Ստեղծել և տպել էջային ենթագոտիներ; Փոխարկել բջիջների բովանդակության և մեկնաբանությունների միջև...
Սուպեր զտիչ (պահպանել և կիրառել ֆիլտրի սխեմաները այլ թերթերի վրա); Ընդլայնված տեսակավորում ըստ ամիս / շաբաթ / օր, հաճախականություն և ավելին; Հատուկ զտիչ համարձակ, շեղատառով ...
Միավորել աշխատանքային տետրերը և աշխատանքային թերթերը; Միավորել աղյուսակները ՝ հիմնված հիմնական սյունակների վրա; Տվյալները բաժանեք մի քանի թերթերի; Խմբաքանակի փոխակերպում xls, xlsx և PDF...
Ավելի քան 300 հզոր առանձնահատկություններ, Աջակցում է Office / Excel 2007-2019 և 365. Աջակցում է բոլոր լեզուները: Հեշտ տեղակայում ձեր ձեռնարկությունում կամ կազմակերպությունում: Ամբողջական հատկություններ ՝ 30-օրյա անվճար փորձաշրջան: 60-օրյա գումարի վերադարձի երաշխիք:

Կարդալ ավելին... Անվճար ներբեռնում... Գնեք ...

Office Tab- ը Tabbed ինտերֆեյսը բերում է Office, և ձեր աշխատանքը շատ ավելի դյուրին դարձրեք

Միացնել ներդիրներով խմբագրումը և ընթերցումը Word, Excel, PowerPoint- ով, Հրատարակիչ, Access, Visio և Project:
Բացեք և ստեղծեք բազմաթիվ փաստաթղթեր նույն պատուհանի նոր ներդիրներում, այլ ոչ թե նոր պատուհաններում:
Բարձրացնում է ձեր արտադրողականությունը 50% -ով և նվազեցնում է ձեզ համար ամեն օր մկնիկի հարյուրավոր կտտոցներ:

Կարդալ ավելին... Անվճար ներբեռնում... Գնեք ...

8 Comments
Login

Sort by Newest
- Best
- Popular
- Newest
- Oldest

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.
Jack · 1 years ago
Hi. I'm very new to ActiveX Controls. I am trying to have multiple checkboxes on one sheet that will hide specific sheets and not all of them or the same one every time. These two scenarios have been my experience. What I need to accomplish is:
CheckBox1 hides Sheet2
CheckBox2 hides Sheet3
CheckBox3 hides Sheet4
CheckBox4 hides Sheet5
CheckBox5 hides Sheet6
CheckBox6 hides Sheet7
CheckBox7 hides Sheet8
CheckBox8 hides Sheet9
- Reply
- To post as a guest, your comment is unpublished.
  crystal · 1 years ago
  
  Hi Jack,
  Just repeat the code and change the checkbox numbers and the sheet names. Try the below code.
  
  Private Sub CheckBox1_Click()
  On Error Resume Next
  ThisWorkbook.Sheets("Sheet2").Visible = CheckBox1.Value
  End Sub
  Private Sub CheckBox2_Click()
  On Error Resume Next
  ThisWorkbook.Sheets("Sheet3").Visible = CheckBox2.Value
  End Sub
  Private Sub CheckBox3_Click()
  On Error Resume Next
  ThisWorkbook.Sheets("Sheet4").Visible = CheckBox3.Value
  End Sub
  Private Sub CheckBox4_Click()
  On Error Resume Next
  ThisWorkbook.Sheets("Sheet5").Visible = CheckBox4.Value
  End Sub
  Private Sub CheckBox5_Click()
  On Error Resume Next
  ThisWorkbook.Sheets("Sheet6").Visible = CheckBox5.Value
  End Sub
  Private Sub CheckBox6_Click()
  On Error Resume Next
  ThisWorkbook.Sheets("Sheet7").Visible = CheckBox6.Value
  End Sub
  Private Sub CheckBox7_Click()
  On Error Resume Next
  ThisWorkbook.Sheets("Sheet8").Visible = CheckBox7.Value
  End Sub
  Private Sub CheckBox8_Click()
  On Error Resume Next
  ThisWorkbook.Sheets("Sheet9").Visible = CheckBox8.Value
  End Sub
  
  Reply
  
  To post as a guest, your comment is unpublished.
  
  Jack · 1 years ago
  
  Crystal,
  Thanks so much...it worked perfectly!
  
  Reply
To post as a guest, your comment is unpublished.
Syahrul · 2 years ago
How do I hide or unhide a sheet with multiple checkbox? For example sheet "MainMenu" need to be hide unless checkbox_1, checkbox_2 & checkbox_3 are checked.
- Reply
To post as a guest, your comment is unpublished.
aitorhdzramos@gmail.com · 3 years ago
Funciona perfectamente pero, ¿cómo se pueden ocultar varias hojas con el mismo checkbox? Muchas gracias!
- Reply
- To post as a guest, your comment is unpublished.
  aitorhdzramos@gmail.com · 3 years ago
  
  Basta con copiar la linea tantas veces como se quiera nombrando la hoja que debe ser ocultada.
  
  Private Sub CheckBox1_Click()
  On Error Resume Next
  ThisWorkbook.Sheets("DB2018").Visible = CheckBox1.Value
  ThisWorkbook.Sheets("V2018").Visible = CheckBox1.Value
  ThisWorkbook.Sheets("R2018").Visible = CheckBox1.Value
  End Sub
  
  Reply
To post as a guest, your comment is unpublished.
Kourtney · 3 years ago
How do you do multiple on the same page? How do i then hide sheet 3 or 4 with a checkbox?
- Reply
- To post as a guest, your comment is unpublished.
  aitorhdzramos@gmail.com · 3 years ago
  
  Private Sub CheckBox1_Click()
  On Error Resume Next
  ThisWorkbook.Sheets("DB2018").Visible = CheckBox1.Value
  ThisWorkbook.Sheets("V2018").Visible = CheckBox1.Value
  ThisWorkbook.Sheets("R2018").Visible = CheckBox1.Value
  End Sub
  
  Reply

Մուտք Ձեր հաշիվը

Գաղտնաբառ վերագործարկում