Skip i'r prif gynnwys

Sut i guddio'r holl daflenni gwaith ac eithrio'r un penodedig neu weithredol yn Excel?

Ar gyfer cadw'r llyfr gwaith yn lân ac yn hawdd ei lywio, efallai yr hoffech guddio'r holl daflenni gwaith ac eithrio'r un weithredol gyfredol yn Excel. Yn yr erthygl hon, byddwn yn dangos dau ddull i chi o guddio pob taflen waith ond un benodol neu weithredol yn Excel.

Cuddiwch yr holl daflenni gwaith ond yr un penodedig yn Excel gyda chod VBA
Cuddio pob taflen waith ond yr un gweithredol gyda Kutools ar gyfer Excel (dim ond sawl clic)


Cuddiwch yr holl daflenni gwaith ond yr un penodedig yn Excel gyda chod VBA


Gallwch guddio'r holl daflenni gwaith ac eithrio'r un penodedig gyda chod VBA yn Excel. Gwnewch fel a ganlyn.

1. Yn y llyfr gwaith agored cyfredol, symudwch i'r daflen waith rydych chi am ei dangos yn unig, ac yna pwyswch Alt + F11 ar yr un pryd i agor y Cymhwysiad Sylfaenol Gweledol Microsoft ffenestr.

2. Yn y Cymhwysiad Sylfaenol Gweledol Microsoft ffenestr, cliciwch Mewnosod > Modiwlau. Gweler y screenshot:

3. Yna copïwch a gludwch y cod VBA isod i mewn i olygydd y Cod.

Cod VBA: cuddiwch bob dalen ac eithrio un benodol

Sub SheetHidden()
	Dim xWs As Worksheet
	Dim xName As String
	xName = Application.InputBox("Range", xTitleId, Application.ActiveSheet.Name, Type: = 2)
	For Each xWs In Application.ActiveWorkbook.Worksheets
		If xWs.Name <> xName Then
			xWs.Visible = xlSheetHidden
		End If
	Next
End Sub

4. Gwasgwch y F5 allwedd i redeg y cod.

5. Ar ôl rhedeg y cod, mae blwch deialog yn dangos enw dalen weithredol yn yr Ystod blwch, yna cliciwch ar y OK botwm.

Yna mae'r holl daflenni gwaith wedi'u cuddio ar unwaith ac eithrio'r un gyfredol yn eich llyfr gwaith.

Nodyn: Ar gyfer arddangos y taflenni gwaith cudd, copïwch a gludwch gan ddilyn y cod VBA i'r Modiwl ac yna pwyswch yr allwedd F5 i redeg y cod.

Cod VBA: dangos taflenni gwaith cudd

Sub SheetUnHidden()
	Dim xWs As Worksheet
	For Each xWs In Application.ActiveWorkbook.Worksheets
		xWs.Visible = True
	Next
End Sub

Cuddio pob taflen waith ond yr un gweithredol gyda Kutools ar gyfer Excel (dim ond un clic)

Gallwch guddio pob dalen ac eithrio'r un benodol neu weithredol gyda dim ond un clic yn Excel.

Cyn gwneud cais Kutools ar gyfer Excel, os gwelwch yn dda ei lawrlwytho a'i osod yn gyntaf.

1. Ewch i mewn i'r ddalen benodol yr ydych am iddi gael ei dangos yn y llyfr gwaith cyfredol yn unig.

2. Yna cliciwch Kutools > Dangos a Chuddio > Cuddio Taflenni Heb eu Dewis.

Yna mae'r holl daflenni yn y llyfr gwaith cyfredol wedi'u cuddio ac eithrio'r un weithredol.

Nodyn: Os ydych chi am arddangos yr holl daflenni gwaith cudd, cliciwch Kutools > Dangos / Cuddio > Dadorchuddio Pob Dalen. Gweler y screenshot:

  Os ydych chi am gael treial am ddim (30 diwrnod) o'r cyfleustodau hwn, cliciwch i'w lawrlwytho, ac yna ewch i gymhwyso'r llawdriniaeth yn ôl y camau uchod.

Offer Cynhyrchiant Swyddfa Gorau

Nodweddion Poblogaidd: Darganfod, Amlygu neu Adnabod Dyblygiadau   |  Dileu Rhesi Gwag   |  Cyfuno Colofnau neu Gelloedd heb Colli Data   |   Rownd heb Fformiwla ...
Super-edrych: VLookup Meini Prawf Lluosog    VLookup Gwerth Lluosog  |   VLookup Ar Draws Taflenni Lluosog   |   Edrych Niwlog ....
Rhestr gwympo Uwch: Creu Rhestr Gollwng yn Gyflym   |  Rhestr Gollwng Dibynnol   |  Rhestr Gollwng Aml-ddewis ....
Rheolwr Colofn: Ychwanegu Nifer Penodol o Golofnau  |  Symud Colofnau  |  Toglo Statws Gwelededd Colofnau Cudd  |  Cymharwch Ystodau a Cholofnau ...
Nodweddion dan Sylw: Ffocws ar y Grid   |  Golwg Dylunio   |   Bar Fformiwla Mawr    Rheolwr Llyfr Gwaith a Thaflen   |  Llyfrgell Adnoddau (Testun Auto)   |  Dewiswr Dyddiad   |  Cyfuno Taflenni Gwaith   |  Amgryptio/Dadgryptio Celloedd    Anfon E-byst trwy Restr   |  Hidlo Super   |   Hidlo Arbennig (hidlo mewn print trwm/italig/strikethrough...) ...
15 Set Offer Gorau12 Testun offer (Ychwanegu Testun, Dileu Cymeriadau,...)   |   50 + Siart Mathau (Siart Gantt,...)   |   40+ Ymarferol Fformiwlâu (Cyfrifwch oedran yn seiliedig ar ben-blwydd,...)   |   19 mewnosod offer (Mewnosod Cod QR, Mewnosod Llun o'r Llwybr,...)   |   12 Trosi offer (Rhifau i Eiriau, Trosi arian cyfred,...)   |   7 Uno a Hollti offer (Rhesi Cyfuno Uwch, Celloedd Hollt,...)   |   ... a mwy

Supercharge Eich Sgiliau Excel gyda Kutools ar gyfer Excel, a Phrofiad Effeithlonrwydd Fel Erioed Erioed. Kutools ar gyfer Excel Yn Cynnig Dros 300 o Nodweddion Uwch i Hybu Cynhyrchiant ac Arbed Amser.  Cliciwch Yma i Gael Y Nodwedd Sydd Ei Angen Y Mwyaf...

tab kte 201905


Mae Office Tab yn dod â rhyngwyneb Tabbed i Office, ac yn Gwneud Eich Gwaith yn Haws o lawer

  • Galluogi golygu a darllen tabbed yn Word, Excel, PowerPoint, Cyhoeddwr, Mynediad, Visio a Phrosiect.
  • Agor a chreu dogfennau lluosog mewn tabiau newydd o'r un ffenestr, yn hytrach nag mewn ffenestri newydd.
  • Yn cynyddu eich cynhyrchiant 50%, ac yn lleihau cannoedd o gliciau llygoden i chi bob dydd!
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