Skip i'r prif gynnwys

Sut i guddio taflenni gwaith penodol yn awtomatig wrth agor ffeil Excel?

Os oes angen i chi guddio rhai taflenni gwaith penodol yn awtomatig pan fydd rhywun yn agor y llyfr gwaith, sut allech chi ddelio â'r swydd hon yn Excel?

Cuddio taflen waith benodol yn awtomatig wrth agor llyfr gwaith gyda chod VBA

Cuddiwch rai taflenni gwaith penodol yn awtomatig wrth agor llyfr gwaith gyda chod VBA


swigen dde glas saethCuddio taflen waith benodol yn awtomatig wrth agor llyfr gwaith gyda chod VBA

Os ydych chi am guddio un daflen waith benodol wrth agor y llyfr gwaith, gallwch gymhwyso'r cod VBA canlynol.

1. Daliwch i lawr y ALT + F11 allweddi i agor y Microsoft Visual Basic ar gyfer Ceisiadau ffenestr.

2. Yn y chwith Prosiect-VBAProject cwarel, cliciwch ddwywaith ar y Llyfr Gwaith hwn i agor Modiwl gwag, ac yna copïo a gludo'r cod canlynol i'r Modiwl:

Cod VBA: Cuddio taflen benodol wrth agor llyfr gwaith:

Private Sub Workbook_Open()
Sheets("Sheet5").Visible = False
End Sub

taflen guddio doc ar agor 1

Nodyn: Yn y cod uchod, Sheet5 yw'r enw dalen rydych chi am ei guddio ar agor. Newidiwch ef i'ch angen.

3. Yna arbedwch a chau y ffenestr god hon, a chlicio Ffeil > Save As i achub y llyfr gwaith hwn fel Llyfr Gwaith Macro-alluogedig Excel fformat, gweler y screenshot:

taflen guddio doc ar agor 2

4. Pan fyddwch chi'n agor y llyfr gwaith hwn y tro nesaf, cliciwch Galluogi Cynnwys botwm yn gyntaf, ac yna bydd eich taflen benodol yn cael ei chuddio'n awtomatig.

taflen guddio doc ar agor 3


swigen dde glas saeth Cuddiwch rai taflenni gwaith penodol yn awtomatig wrth agor llyfr gwaith gyda chod VBA

Os oes angen cuddio nifer o daflenni gwaith wrth agor y llyfr gwaith, dyma god hefyd a all eich helpu chi.

1. Yn gyntaf, dylech chi restru'r enwau dalennau rydych chi am guddio arnyn nhw ar agor mewn rhestr o daflen waith, ac yna mynd i'r Blwch enw i roi enw amrediad iddynt-TaflenniToHide, a'r wasg Rhowch allwedd, gweler y screenshot:

taflen guddio doc ar agor 4

2. Yna dal i lawr y ALT + F11 allweddi i agor y Microsoft Visual Basic ar gyfer Ceisiadau ffenestr.

3. Yn y chwith Prosiect-VBAProject cwarel, cliciwch ddwywaith ar y Llyfr Gwaith hwn i agor Modiwl gwag, ac yna copïo a gludo'r cod canlynol i'r Modiwl:

Cod VBA: Cuddio rhai taflenni gwaith penodol wrth agor llyfr gwaith:

Private Sub Workbook_BeforeClose(Cancel As Boolean)
   'Updateby Extendoffice 20161206
    Dim ws As Worksheet
    For Each ws In Worksheets
       ws.Visible = xlSheetVisible
    Next ws
End Sub
Private Sub Workbook_Open()
    Dim ws As Worksheet
        For Each ws In Worksheets
            If WorksheetFunction.CountIf([SheetsToHide], ws.Name) > 0 Then
                ws.Visible = xlSheetHidden
                MsgBox ws.Name & "Has been hidden!", vbInformation, "Kutools for Excel"
            Else
                ws.Visible = xlSheetVisible
            End If
        Next ws
    Set ws = Nothing
End Sub

taflen guddio doc ar agor 5

Nodyn: Yn y cod uchod, TaflenniToHide yw'r enw amrediad rydych chi wedi'i greu yng ngham 1.

4. Yna arbedwch a chau y ffenestr god hon, a chlicio Ffeil > Save As i achub y llyfr gwaith hwn fel Llyfr Gwaith Macro-alluogedig Excel fformat. O hyn ymlaen, pan fyddwch chi'n agor y llyfr gwaith hwn y tro nesaf, bydd y taflenni gwaith penodedig yn cael eu cuddio'n awtomatig.

Offer Cynhyrchiant Swyddfa Gorau

🤖 Kutools AI Aide: Chwyldro dadansoddi data yn seiliedig ar: Cyflawniad Deallus   |  Cynhyrchu Cod  |  Creu Fformiwlâu Personol  |  Dadansoddi Data a Chynhyrchu Siartiau  |  Invoke Swyddogaethau Kutools...
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...

Disgrifiad


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