Skip to main content

Conas nascleanúint a dhéanamh idir bileoga oibre trí liosta anuas in Excel a úsáid?

Ag ceapadh, tá leabhar oibre agat ina bhfuil iliomad bileoga oibre, anois, ní mór duit liosta anuas nó bosca teaglama a chruthú a liostaíonn gach ainm bileoige agus nuair a roghnaíonn tú ainm bileog amháin ón liosta anuas, léimfidh sé chuig an mbileog sin láithreach. San alt seo, tabharfaidh mé isteach conas nascleanúint a dhéanamh idir bileoga oibre trí liosta anuas in Excel a úsáid.

Déan nascleanúint idir bileoga oibre trí liosta anuas a úsáid in Excel


Déan nascleanúint idir bileoga oibre trí liosta anuas a úsáid in Excel

Chun léim chuig gach bileog roghnaithe trí liosta anuas a úsáid, déan na céimeanna seo a leanas le do thoil:

1. Cliceáil Forbróir > Ionsáigh > Bosca Teaglama (Rialú ActiveX), féach ar an scáileán:

2. Ansin tarraing an luch chun bosca teaglama a tharraingt, agus ansin cliceáil ar dheis air, roghnaigh Féach an cód ón roghchlár comhthéacs, féach an scáileán:

3. San oscailt Microsoft Visual Basic d’Fheidhmchláir an cód seo a leanas a fhuinneogú, a chóipeáil agus a ghreamú chun an bunchód a athsholáthar, féach an scáileán:

Cód VBA: Téigh idir bileoga oibre trí liosta anuas a úsáid

Private Sub ComboBox1_Change()
'Updateby Extendoffice
    If ComboBox1.ListIndex > -1 Then Sheets(ComboBox1.Text).Select
End Sub
Private Sub ComboBox1_DropButtonClick()
    Dim xSheet As Worksheet
    On Error Resume Next
    Application.ScreenUpdating = False
    Application.EnableEvents = False
    If ComboBox1.ListCount <> ThisWorkbook.Sheets.Count Then
        ComboBox1.Clear
        For Each xSheet In ThisWorkbook.Sheets
            ComboBox1.AddItem xSheet.Name
        Next xSheet
    End If
    Application.EnableEvents = True
    Application.ScreenUpdating = True
End Sub
Private Sub ComboBox1_GotFocus()
    If ComboBox1.ListCount <> 0 Then ComboBox1.DropDown
End Sub

4. Ansin sábháil agus dún an fhuinneog cód seo, agus ansin cliceáil Mód Dearaidh chun an modh dearaidh a mhúchadh, anois, agus ainm bileog amháin á roghnú as an mbosca teaglama, rachaidh sé chuig an mbileog sin ag an am céanna, féach an scáileán:


Déan nascleanúint idir bileoga oibre trí hipearnasc nó cnaipí a úsáid:

Le Kutools le haghaidh Excel's Cruthaigh Liosta Ainmneacha Bileog fóntais, is féidir leat gach ainm bileog oibre a liostáil go tapa i mbileog nua le hipearnasc nó macra-cnaipí, ansin is féidir leat nascleanúint a dhéanamh eatarthu de réir do riachtanas.

Kutools le haghaidh Excel: le níos mó ná 300 breiseán áisiúil Excel, saor in aisce le triail gan aon teorannú i 30 lá. Íoslódáil agus triail saor in aisce Anois!

Uirlisí Táirgiúlachta Oifige is Fearr

🤖 Kutools AI Aide: anailís sonraí a réabhlóidiú bunaithe ar: Forghníomhú Chliste   |  Gin Cód  |  Cruthaigh Foirmlí Saincheaptha  |  Anailís a dhéanamh ar Sonraí agus Cairteacha a Ghin  |  Feidhmeanna Kutools a agairt...
Gnéithe Coitianta: Faigh, Aibhsigh nó Aithnigh Dúblaigh   |  Scrios Sraitheanna Bána   |  Comhcheangail Colúin nó Cealla gan Sonraí a Chailleadh   |   Babhta gan Foirmle ...
Cuardaigh Super: Ilchritéir VLookup    VLookup Illuachanna  |   VLookup Trasna Ilbhileoga   |   Amharc doiléir ....
Liosta anuas Casta: Go tapa Cruthaigh Liosta Anuas   |  Liosta anuas Cleithiúnach   |  Liosta Buail Isteach Ilroghnacha ....
Bainisteoir Colún: Cuir Líon Sonrach Colún leis  |  Colúin Bog  |  Scoránaigh Stádas Infheictheachta na gColún Ceilte  |  Déan comparáid idir Raonta & Colúin ...
Gnéithe Réadmhaoin: Fócas Eangaí   |  Amharc Dearaidh   |   Barra Mór na Foirmle    Leabhar Oibre & Bainisteoir Bileog   |  Leabharlann Acmhainní (Uaththéacs)   |  Piocálaí Dáta   |  Comhcheangail Bileoga Oibre   |  Criptigh/Díchriptigh Cealla    Seol Ríomhphost trí Liosta   |  Scagaire Super   |   Scagaire Speisialta (scagaire trom/iodálach/stailc tríd...) ...
Barr 15 Uirlisí12 Téacs uirlisí (Cuir Téacs, Bain Carachtair,...)   |   50 + Cairt cineálacha (Cairt Gantt,...)   |   40+ Praiticiúil Foirmlí (Ríomh aois bunaithe ar lá breithe,...)   |   19 Insertion uirlisí (Cuir isteach Cód QR, Ionsáigh Pictiúr ón gCosán,...)   |   12 Tiontú uirlisí (Uimhreacha le Focail, Comhshó Airgeadra,...)   |   7 Cumaisc & Scoilt uirlisí (Sraitheanna Comhcheangail Casta, Cealla Scoilt,...)   |   ... agus eile

Supercharge Do Scileanna Excel le Kutools le haghaidh Excel, agus Éifeachtúlacht Taithí Cosúil Ná Roimhe. Kutools le haghaidh Excel Tairiscintí Níos mó ná 300 Ardghnéithe chun Táirgiúlacht a Treisiú agus Sábháil Am.  Cliceáil anseo chun an ghné is mó a theastaíonn uait a fháil ...

Tuairisc


Tugann Tab Oifige comhéadan Tabbed chuig Office, agus Déan Do Obair i bhfad Níos Éasca

  • Cumasaigh eagarthóireacht agus léamh tabbed i Word, Excel, PowerPoint, Foilsitheoir, Rochtain, Visio agus Tionscadal.
  • Oscail agus cruthaigh cáipéisí iolracha i gcluaisíní nua den fhuinneog chéanna, seachas i bhfuinneoga nua.
  • Méadaíonn do tháirgiúlacht 50%, agus laghdaíonn sé na céadta cad a tharlaíonn nuair luch duit gach lá!
Comments (12)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
The drop down list will not open hidden sheets, is it able to open hidden sheets?
This comment was minimized by the moderator on the site
hi, is it possible to combine various option from different dropdowns and open sheets accordingly.

eg: if Option1 from dropdown1 is selected and Option2 from dropdown2 is selected then only the Sheet2 will open
This comment was minimized by the moderator on the site
hi there,
Thank you very much for the code which create a dynamic combo box to navigate the sheets. Unfortunately I got an error. After navigating few sheets, the file automatically close. It doesn't even show any error message. I couldn't figure out the reason. I appreciate the help
Thanks
This comment was minimized by the moderator on the site
same error too, Did you figure it out?
This comment was minimized by the moderator on the site
thanks for your code. It works for switching different sheet based on dropdown list.
But I have several questions.
1. after I process the related sheet, and want to go back to main menu(with sheet dropdown list), how could I do without using mouse?
2. when I open the file, I would like the main menu(with dropdown list) as default . So I could start from this menu
thanks
rose
This comment was minimized by the moderator on the site
How do you change this to only show/select visible worksheets?
This comment was minimized by the moderator on the site
Hi,
To ignore the hidden sheets from the drop down list, and only keep the visible worksheets, the following VBA code may help you:

Private Sub ComboBox1_Change()
'Updateby Extendoffice
If ComboBox1.ListIndex > -1 Then Sheets(ComboBox1.Text).Select
End Sub
Private Sub ComboBox1_DropButtonClick()
Dim xSheet As Worksheet
On Error Resume Next
Application.ScreenUpdating = False
Application.EnableEvents = False
If ComboBox1.ListCount <> ThisWorkbook.Sheets.Count Then
ComboBox1.Clear
For Each xSheet In ThisWorkbook.Sheets
If xSheet.Visible Then
ComboBox1.AddItem xSheet.Name
End If
Next xSheet
End If
Application.EnableEvents = True
Application.ScreenUpdating = True
End Sub
Private Sub ComboBox1_GotFocus()
If ComboBox1.ListCount <> 0 Then ComboBox1.DropDown
End Sub

Please try it, hope it can help you!
This comment was minimized by the moderator on the site
It worked! Thank you! Do you know if this code will cause problems if sheets are renamed or will it update the list automatically?
This comment was minimized by the moderator on the site
Hello,
The above code works well when renaming the sheet name and the items in the drop down list will be updated automatically.
You can try it.
This comment was minimized by the moderator on the site
How can I add only specific sheets? and not all the sheet in the workbook
This comment was minimized by the moderator on the site
Did you have any joy finding code to show only certain sheets in the dropdown box?
This comment was minimized by the moderator on the site
How can I make the hidden sheet active and hide the home page?
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations