Πώς να δημιουργήσετε μια αναπτυσσόμενη λίστα με υπερσυνδέσμους σε κάθε φύλλο στο Excel;
Ίσως έχετε δημιουργήσει μια αναπτυσσόμενη λίστα στο παρελθόν, αλλά έχετε δημιουργήσει ποτέ μια αναπτυσσόμενη λίστα με τους υπερσυνδέσμους σε κάθε φύλλο στο Excel όπως φαίνεται στο παρακάτω στιγμιότυπο οθόνης;
Δημιουργήστε μια αναπτυσσόμενη λίστα με υπερσυνδέσμους φύλλων
Δημιουργήστε μια λίστα με φύλλα με υπερσυνδέσμους
Δημιουργήστε μια αναπτυσσόμενη λίστα με υπερσύνδεση φύλλων
Υπάρχει μόνο ένας κωδικός VBA που μπορεί να χειριστεί την εργασία στο Excel.
1. κλικ Εργολάβος > Κύριο θέμα > Combo Box (στοιχεία ελέγχου ActiveX).
Σημείωση: Εάν η καρτέλα προγραμματιστή δεν εμφανίζεται στην κορδέλα, κάντε κλικ Αρχεία > Επιλογές > Προσαρμογή της Κορδέλας, και στη συνέχεια ελέγξτε το Εργολάβος επιλογή στο σωστό πλαίσιο. Δείτε το στιγμιότυπο οθόνης:
2. Στη συνέχεια σχεδιάστε ένα Combo Box οπουδήποτε θέλετε.
3. Κάντε δεξί κλικ στο φύλλο που σχεδιάσατε το Combo Box μόλις τώρα και κάντε κλικ στο Προβολή κωδικού από το μενού περιβάλλοντος.
4. Αντιγράψτε και επικολλήστε τον παρακάτω κώδικα στο κενό σενάριο και, στη συνέχεια, αποθηκεύστε τον για να επιστρέψετε στο φύλλο.
VBA: Δημιουργία αναπτυσσόμενης λίστας με συνδέσμους φύλλων
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. κλικ Εργολάβος > Λειτουργία σχεδίασης για έξοδο από τη λειτουργία σχεδίασης.
Τώρα όλα τα φύλλα έχουν καταχωρηθεί στην αναπτυσσόμενη λίστα και θα μεταβεί στο φύλλο ενώ κάνετε κλικ στο όνομα του φύλλου.
Δημιουργήστε μια λίστα με φύλλα με υπερσυνδέσμους
Εάν θέλετε απλώς να δημιουργήσετε μια λίστα με ονόματα φύλλων με δυνατότητα κλικ, όπως φαίνεται στο παρακάτω στιγμιότυπο οθόνης, μπορείτε να κάνετε αίτηση Kutools for Excel'S Create List of Sheet Names χαρακτηριστικό που μπορεί να δημιουργήσει μια λίστα υπερσυνδέσμων σχετικά με ονόματα φύλλων ή λίστα κουμπιών μακροεντολών σχετικά με τα ονόματα φύλλων.
Kutools για Excel, με περισσότερα από 300 εύχρηστες λειτουργίες, διευκολύνει τις εργασίες σας. |
Μετά την εγκατάσταση Kutools για Excel, κάντε τα παρακάτω:(Δωρεάν λήψη Kutools για Excel τώρα!)
1. κλικ Kutools Plus > Φύλλο εργασίας > Create List of Sheet Names.
2. Στο Create List of Sheet Names διαλόγου, κάντε τα παρακάτω:
(1). Ελεγχος Contains a list of hyperlinks< για να δημιουργήσετε μια λίστα με ονόματα φύλλων με δυνατότητα κλικ ή ελέγξτε Contains buttons and macros για να δημιουργήσετε κουμπιά που συνδέονται με κάθε φύλλο.
(2). Δώστε το νέο φύλλο στο οποίο θα τοποθετήσετε τους υπερσυνδέσμους σε ένα όνομα.
(3). Καθορίστε τη θέση του νέου φύλλου.
(4). Καθορίστε τους συνδέσμους φύλλων που εμφανίζονται ως πόσες στήλες.
3. Κάντε κλικ στο Ok, τώρα τα ονόματα των φύλλων με δυνατότητα κλικ έχουν εμφανιστεί σε νέο φύλλο.
Διαδήλωση
Τα καλύτερα εργαλεία παραγωγικότητας γραφείου
Αυξήστε τις δεξιότητές σας στο Excel με τα Kutools για Excel και απολαύστε την αποτελεσματικότητα όπως ποτέ πριν. Το Kutools για Excel προσφέρει πάνω από 300 προηγμένες δυνατότητες για την ενίσχυση της παραγωγικότητας και την εξοικονόμηση χρόνου. Κάντε κλικ εδώ για να αποκτήσετε τη δυνατότητα που χρειάζεστε περισσότερο...
Το Office Tab φέρνει τη διεπαφή με καρτέλες στο Office και κάνει την εργασία σας πολύ πιο εύκολη
- Ενεργοποίηση επεξεργασίας και ανάγνωσης καρτελών σε Word, Excel, PowerPoint, Publisher, Access, Visio και Project.
- Ανοίξτε και δημιουργήστε πολλά έγγραφα σε νέες καρτέλες του ίδιου παραθύρου και όχι σε νέα παράθυρα.
- Αυξάνει την παραγωγικότητά σας κατά 50% και μειώνει εκατοντάδες κλικ του ποντικιού για εσάς κάθε μέρα!