Sut i agor taflen waith benodol yn ôl gwerth dethol Blwch Combo yn Excel?

Gan dybio bod gennych chi Flwch Combo sy'n cynnwys holl enwau dalennau'r llyfr gwaith cyfredol fel y dangosir isod. Ac yn awr, rydych chi am agor taflen waith benodol wrth ddewis enw'r ddalen gyfatebol mewn Blwch Combo. Sut i'w gyflawni? Gall y dull yn yr erthygl hon eich helpu chi.

Agorwch daflen waith benodol yn ôl y gwerth a ddewiswyd mewn Blwch Combo gyda chod VBA

Agorwch daflen waith benodol yn ôl y gwerth a ddewiswyd mewn Blwch Combo gyda chod VBA

Anhygoel! Defnyddio Tabiau Effeithlon yn Excel Fel Chrome, Edge, Firefox a Safari!
Arbedwch 50% o'ch amser, a lleihau miloedd o gliciau llygoden i chi bob dydd!

Gall y cod VBA isod eich helpu chi i fynd i daflen waith benodol yn seiliedig ar y dewis Blwch Combo yn Excel. Gwnewch fel a ganlyn.

Nodyn: Os nad yw'r Blwch Combo yn cynnwys unrhyw enw dalen yn eich taflen waith, dilynwch y domen isod i ychwanegu pob enw dalen at y Blwch Combo hwnnw yn gyflym. Ac os oes Blwch Combo eisoes yn cynnwys yr holl enwau dalennau, symudwch i'r cam 1 yn uniongyrchol.

Tip: Mewnosodwch Botwm Gorchymyn 1 yn eich taflen waith, cliciwch ar y dde a dewis Gweld y Cod o'r ddewislen clicio ar y dde. Yna copïwch a gludwch y cod VBA isod i'r Côd ffenestr, a gwasgwch y Alt + Q allweddi i gau'r Microsoft Visual Basic ar gyfer Cymhwyso ffenestr. Cliciwch y Botwm Gorchymyn a fewnosodwyd, yna bydd holl enwau dalennau'r llyfr gwaith cyfredol yn cael eu hychwanegu at y ComboBox1 yn awtomatig.

Cod VBA: Ychwanegwch yr holl enwau dalennau mewn Blwch Combo yn hawdd

Private Sub CommandButton1_Click()
    Me.ComboBox1.Clear
    Dim strWs As String
    Dim i As Integer
    
    For i = 1 To ThisWorkbook.Sheets.Count
        Me.ComboBox1.AddItem Sheets(i).Name
    Next

End Sub

Os oes Blwch Combo eisoes yn cynnwys yr holl enwau dalennau, gwnewch fel a ganlyn.

1. Trowch ar y Modd Dylunio O dan y Datblygwr tab.

2. De-gliciwch y blwch combo gydag enwau dalennau, yna cliciwch Gweld y Cod o'r ddewislen clicio ar y dde.

3. Yna y Microsoft Visual Basic ar gyfer Ceisiadau ffenestr yn ymddangos, rhowch y cod VBA isod yn lle'r cod VBA gwreiddiol yn ffenestr y Cod.

Cod VBA: Agorwch daflen waith benodol yn ôl gwerth dethol y Blwch Combo

Private Sub ComboBox1_Change()
    Dim actWsh As String
    actWsh = ComboBox1.Text
    Worksheets(actWsh).Select
    
End Sub

Nodyn: yn y cod, ComboBox1 yw enw'r blwch combo sy'n cynnwys enwau'r ddalen.

4. Gwasgwch y Alt + Q allweddi i gau'r Microsoft Visual Basic ar gyfer Ceisiadau ffenestr, a diffodd y Modd Dylunio O dan y Datblygwr tab.

Nawr, wrth ddewis unrhyw enw taflen waith yn y Blwch Combo, bydd y daflen waith gyfatebol yn cael ei hagor yn awtomatig.

Erthyglau perthnasol:

• Sut i gopïo gwerth Blwch Combo i gell weithredol yn Excel?
• Sut i arddangos fformat dyddiad mewn allbwn blwch combo yn Excel?
• Sut i guddio neu guddio Botwm Gorchymyn yn seiliedig ar werth celloedd penodol yn Excel?
• Sut i atal neu analluogi teipio mewn blwch combo yn Excel?
• Sut i dabio allan o'r blwch combo i ddewis cell benodol yn Excel?

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 Gorau:  12 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...

Read More ... Lawrlwythiad Am Ddim...

---

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!

Read More ... Lawrlwythiad Am Ddim...