Cum se creează o listă derulantă cu hyperlinkuri către fiecare foaie din Excel?
Poate că ați mai creat o listă derulantă, dar ați creat vreodată o listă derulantă cu hyperlink-uri către fiecare foaie din Excel, așa cum este prezentat mai jos?
Creați o listă derulantă cu hyperlinkuri de foaie
Creați o listă de foi cu hyperlinkuri
Creați o listă verticală cu hyperlink de foaie
Există doar un cod VBA care poate gestiona lucrarea în Excel.
1. clic Dezvoltator > Insera > Combo Box (comenzi ActiveX).
Notă: dacă fila dezvoltator nu este afișată în panglică, faceți clic pe Fișier > Opţiuni > Personalizați panglica, și apoi verificați Dezvoltator opțiune în caseta din dreapta. Vedeți captura de ecran:
2. Apoi desenați o casetă combinată oriunde doriți.
3. Faceți clic dreapta pe foaia pe care ați desenat cutia combinată chiar acum și faceți clic Afișați codul din meniul contextual.
4. Copiați și lipiți codul de mai jos pe scriptul gol, apoi salvați-l pentru a reveni la foaie.
VBA: Creați o listă derulantă cu linkuri de foaie
Private Sub ComboBox1_Change()
'UpdatebyExtendoffice20180404
Sheets(Me.ComboBox1.Text).Select
End Sub
Private Sub ComboBox1_GotFocus()
Dim I As Long
Me.ComboBox1.Style = fmStyleDropDownList
If Me.ComboBox1.ListCount <> Sheets.Count Then
Me.ComboBox1.Clear
For I = 1 To ActiveWorkbook.Sheets.Count
Me.ComboBox1.AddItem Sheets(I).Name
Next
End If
Me.ComboBox1.DropDown
End Sub
5. Click Developer > Design Mode to exit the design mode.
Now all sheets have been listed in the drop-down list, and it will go to the sheet while you clicking at the sheet name.
Create a list of sheets with hyperlinks
If you just want to create a list of clickable sheet names as below screenshot shown, you can apply Kutools for Excel’s Create List of Sheet Names feature which can create a list of hyperlinks about sheet names or list of macro buttons about sheet names.
Kutools for Excel, with more than 300 handy functions, makes your jobs more easier.
After installing Kutools for Excel, please do as below:（Free Download Kutools for Excel Now!)
1. Click Kutools Plus > Worksheet > Create List of Sheet Names.
2. In the Create List of Sheet Names dialog, do as below:
(1). Check Contains a list of hyperlinks< to create a list of clickable sheet names, or check Contains buttons and macros to create buttons which link to each sheet.
(2). Give the new sheet which you will place the hyperlinks in a name.
(3). Specify the location of the new sheet.
(4). Specify the sheet links displayed as how many columns.
3. click Ok, now the clickable sheet names have been displayed in new sheet.
Demo
The Best Office Productivity Tools
Kutools for Excel Solves Most of Your Problems, and Increases Your Productivity by 80%
- Reuse: Quickly insert complex formulas, charts and anything that you have used before; Encrypt Cells with password; Create Mailing List and send emails...
- Super Formula Bar (easily edit multiple lines of text and formula); Reading Layout (easily read and edit large numbers of cells); Paste to Filtered Range...
- Merge Cells/Rows/Columns without losing Data; Split Cells Content; Combine Duplicate Rows/Columns... Prevent Duplicate Cells; Compare Ranges...
- Select Duplicate or Unique Rows; Select Blank Rows (all cells are empty); Super Find and Fuzzy Find in Many Workbooks; Random Select...
- Exact Copy Multiple Cells without changing formula reference; Auto Create References to Multiple Sheets; Insert Bullets, Check Boxes and more...
- Extract Text, Add Text, Remove by Position, Remove Space; Create and Print Paging Subtotals; Convert Between Cells Content and Comments...
- Super Filter (save and apply filter schemes to other sheets); Advanced Sort by month/week/day, frequency and more; Special Filter by bold, italic...
- Combine Workbooks and WorkSheets; Merge Tables based on key columns; Split Data into Multiple Sheets; Batch Convert xls, xlsx and PDF...
- More than 300 powerful features. Supports Office / Excel 2007-2021 and 365. Supports all languages. Easy deploying in your enterprise or organization. Full features 30-day free trial. 60-day money back guarantee.
Office Tab Brings Tabbed interface to Office, and Make Your Work Much Easier
- Enable tabbed editing and reading in Word, Excel, PowerPoint, Publisher, Access, Visio and Project.
- Open and create multiple documents in new tabs of the same window, rather than in new windows.
- Increases your productivity by 50%, and reduces hundreds of mouse clicks for you every day!
