Note: The other languages of the website are Google-translated. Back to English

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.


Yr Offer Cynhyrchedd Swyddfa Gorau

Mae Kutools for Excel yn Datrys y rhan fwyaf o'ch Problemau, ac yn Cynyddu Eich Cynhyrchedd 80%

  • Ailddefnyddio: Mewnosod yn gyflym fformwlâu cymhleth, siartiau ac unrhyw beth rydych chi wedi'i ddefnyddio o'r blaen; Amgryptio Celloedd gyda chyfrinair; Creu Rhestr Bostio ac anfon e-byst ...
  • Bar Fformiwla Gwych (golygu llinellau lluosog o destun a fformiwla yn hawdd); Cynllun Darllen (darllen a golygu nifer fawr o gelloedd yn hawdd); Gludo i'r Ystod Hidlo...
  • Uno Celloedd / Rhesi / Colofnau heb golli Data; Cynnwys Celloedd Hollt; Cyfuno Rhesi / Colofnau Dyblyg... Atal Celloedd Dyblyg; Cymharwch y Meysydd...
  • Dewiswch Dyblyg neu Unigryw Rhesi; Dewiswch Blank Rows (mae pob cell yn wag); Darganfyddiad Gwych a Darganfyddiad Niwlog mewn Llawer o Lyfrau Gwaith; Dewis ar Hap ...
  • Copi Union Celloedd Lluosog heb newid cyfeirnod fformiwla; Auto Creu Cyfeiriadau i Daflenni Lluosog; Mewnosod Bwledi, Blychau Gwirio a mwy ...
  • Testun Detholiad, Ychwanegu Testun, Tynnu yn ôl Swydd, Tynnwch y Gofod; Creu ac Argraffu Subtotals Paging; Trosi rhwng Cynnwys a Sylwadau Celloedd...
  • Hidlo Super (arbed a chymhwyso cynlluniau hidlo i ddalenni eraill); Trefnu Uwch yn ôl mis / wythnos / dydd, amlder a mwy; Hidlo Arbennig gan feiddgar, italig ...
  • Cyfuno Llyfrau Gwaith a Thaflenni Gwaith; Uno Tablau yn seiliedig ar golofnau allweddol; Rhannwch Ddata yn Daflenni Lluosog; Trosi Swp xls, xlsx a PDF...
  • Mwy na 300 o nodweddion pwerus. Yn cefnogi Office / Excel 2007-2021 a 365. Yn cefnogi pob iaith. Defnydd hawdd yn eich menter neu sefydliad. Nodweddion llawn treial am ddim 30 diwrnod. Gwarant arian yn ôl 60 diwrnod.
tab kte 201905

Mae Tab Office yn Dod â rhyngwyneb Tabbed i'r Swyddfa, a 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!
gwaelod officetab
sylwadau (0)
Dim sgôr eto. Byddwch y cyntaf i sgorio!
Nid oes unrhyw sylwadau wedi'u postio yma eto
Gadewch eich sylwadau
Postio fel Gwestai
×
Graddiwch y swydd hon:
0   Cymeriadau
Lleoliadau a Awgrymir

Dilynwch ni

Hawlfraint © 2009 - www.extendoffice.com. | Cedwir pob hawl. Wedi ei bweru gan ExtendOffice. | Map o'r safle
Mae Microsoft a logo'r Swyddfa yn nodau masnach neu'n nodau masnach cofrestredig Microsoft Corporation yn yr Unol Daleithiau a / neu wledydd eraill.
Wedi'i warchod gan Sectigo SSL