Sut i restru'r holl daflenni gweladwy neu gudd o'r llyfr gwaith?
Os oes gennych lyfr gwaith mawr sy'n cynnwys rhai taflenni gwaith cudd, nawr, mae angen i chi restru'r holl daflenni gweladwy a chudd ar wahân mewn taflen waith fel y dangosir y llun a ganlyn. Yr erthygl hon, byddaf yn siarad am sut i restru'r holl daflenni gweladwy a chudd yn Excel.
Rhestrwch yr holl daflenni gweladwy a chudd ar wahân gyda chod VBA
Rhestrwch yr holl daflenni gweladwy yn Excel gyda Kutools ar gyfer Excel
Rhestrwch yr holl daflenni gweladwy a chudd ar wahân gyda chod VBA
I restru'r enwau tab gweladwy a chudd mewn taflen waith, gall y cod VBA canlynol ffafrio chi, gwnewch fel hyn:
1. Daliwch i lawr y ALT + F11 allweddi i agor y Microsoft Visual Basic ar gyfer Ceisiadau ffenestr.
2. Cliciwch Mewnosod > Modiwlau, a gludwch y cod canlynol yn y Modiwlau Ffenestr.
Cod VBA: Rhestrwch yr holl daflenni gweladwy a chudd ar wahân:
Sub NameSheets()
'Updateby Extendoffice
Dim x As Long, y As Long, z As Long
Dim ws As Worksheet
Dim shtCnt As Integer
x = 1
y = 1
z = 1
shtCnt = ThisWorkbook.Sheets.Count
On Error Resume Next
Application.ScreenUpdating = False
Sheets.Add After:=Sheets(Sheets.Count)
For i = 1 To shtCnt
If Sheets(i).Visible = xlSheetHidden Then
Cells(x, 2) = Sheets(i).Name
x = x + 1
End If
If Sheets(i).Visible = xlSheetVisible Then
Cells(y, 1) = Sheets(i).Name
y = y + 1
End If
If Sheets(i).Visible = xlSheetVeryHidden Then
Cells(z, 3) = Sheets(i).Name
z = z + 1
End If
Next i
Application.ScreenUpdating = True
End Sub
3. Yna pwyswch F5 yn allweddol i redeg y cod hwn, mae'r holl daflenni gweladwy, cudd, cudd iawn wedi'u rhestru mewn dalen newydd ar wahân fel y dangosir y screenshot canlynol:
Rhestrwch yr holl daflenni gweladwy yn Excel gyda Kutools ar gyfer Excel
Os oes gennych Kutools ar gyfer Excel, Gyda'i Creu Rhestr o Enwau Dalennau nodwedd, gallwch chi restru'n gyflym yr holl daflenni gweladwy o'r llyfr gwaith cyfredol gyda hypergysylltiadau i bob tab.
Kutools ar gyfer Excel : gyda mwy na 300 o ychwanegiadau Excel defnyddiol, am ddim i geisio heb unrhyw gyfyngiad mewn 30 diwrnod. |
Ar ôl gosod Kutools ar gyfer Excel, gwnewch fel a ganlyn:
1. Cliciwch Kutools Byd Gwaith > Taflen Waith > Creu Rhestr o Enwau Dalennau, gweler y screenshot:
2. Yn y Creu Rhestr o Enwau Dalennau blwch deialog:
(1.) Dewis Yn cynnwys rhestr o hyperddolenni O dan y Arddulliau Mynegai Dalennau adran;
(2.) Rhowch enw taflen waith ar gyfer mynegai dalennau.
(3.) Nodwch leoliad mynegai y daflen waith.
(4.) Nodwch faint o golofnau rydych chi am arddangos enwau'r daflen waith yn y mynegai dalennau.
3. Ac yna cliciwch Ok botwm, mae'r holl ddalenni gweladwy wedi'u rhestru mewn dalen newydd ac eithrio'r taflenni cudd, gweler y screenshot:
Cliciwch Lawrlwythwch a threial am ddim Kutools ar gyfer Excel Nawr!
Offer Cynhyrchiant Swyddfa Gorau
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...
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!