Πώς να ανοίξετε ένα φύλλο εργασίας επιλέγοντας το όνομά του σε ένα σύνθετο πλαίσιο στο Excel;

Ας υποθέσουμε ότι έχετε ένα Combo Box στο βιβλίο εργασίας του Excel που περιέχει μια λίστα με όλα τα ονόματα φύλλων. Θέλετε να ανοίξετε ένα συγκεκριμένο φύλλο εργασίας επιλέγοντας το όνομά του από το Combo Box. Αυτός ο οδηγός δείχνει πώς να το επιτύχετε αυτό χρησιμοποιώντας κώδικα VBA, με βήματα για να συμπληρώσετε το Combo Box με ονόματα φύλλων και να ενεργοποιήσετε την επιθυμητή λειτουργικότητα.

Ανοίξτε ένα φύλλο εργασίας επιλέγοντας το όνομά του σε ένα σύνθετο πλαίσιο με κωδικό VBA

Ανοίξτε ένα φύλλο εργασίας επιλέγοντας το όνομά του σε ένα σύνθετο πλαίσιο με κωδικό VBA

Ο παρακάτω κώδικας VBA μπορεί να σας βοηθήσει να μεταβείτε σε ένα συγκεκριμένο φύλλο εργασίας με βάση την επιλογή Combo Box στο Excel. Κάντε τα εξής:

Σημείωση: Εάν το Combo Box δεν περιέχει κανένα όνομα φύλλου στο φύλλο εργασίας σας, ακολουθήστε την παρακάτω συμβουλή για να προσθέσετε γρήγορα όλα τα ονόματα φύλλων σε αυτό το Combo Box. Εάν υπάρχει ήδη ένα Combo Box που περιέχει όλα τα ονόματα φύλλων, προχωρήστε απευθείας στο βήμα 1.

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

Εάν υπάρχει ήδη ένα Combo Box που περιέχει όλα τα ονόματα φύλλων, κάντε τα εξής.

1. Αναψε το Λειτουργία σχεδίασης σύμφωνα με το Εργολάβος Tab.

2. Κάντε δεξί κλικ στο σύνθετο πλαίσιο με ονόματα φύλλων και, στη συνέχεια, κάντε κλικ στο Προβολή κωδικού από το μενού με δεξί κλικ.

3. Τότε το Microsoft Visual Basic για εφαρμογές αναδυόμενο παράθυρο, αντικαταστήστε τον αρχικό κωδικό VBA στο παράθυρο Κωδικός με τον παρακάτω κωδικό VBA.

Κωδικός VBA: Ανοίξτε ένα συγκεκριμένο φύλλο εργασίας με επιλεγμένη τιμή του Combo Box

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

Σημείωση: στον κωδικό, το ComboBox1 είναι το όνομα του σύνθετου πλαισίου που περιέχει τα ονόματα φύλλων.

4. Πάτα το άλλος + Q πλήκτρα για να κλείσετε το Microsoft Visual Basic για εφαρμογές παράθυρο και απενεργοποιήστε το Λειτουργία σχεδίασης σύμφωνα με το Εργολάβος Tab.

Τώρα, επιλέγοντας οποιοδήποτε όνομα φύλλου εργασίας στο Combo Box θα ανοίξει αυτόματα το αντίστοιχο φύλλο εργασίας.

Σχετικά Άρθρα:

• Πώς να αντιγράψετε την τιμή Combo Box σε ενεργό κελί στο Excel;
• Πώς να εμφανίσετε τη μορφή ημερομηνίας στην έξοδο σύνθετου πλαισίου στο Excel;
• Πώς να αποκρύψετε ή να αποκρύψετε ένα κουμπί εντολής με βάση την καθορισμένη τιμή κελιού στο Excel;
• Πώς να αποτρέψετε ή να απενεργοποιήσετε την πληκτρολόγηση σε ένα σύνθετο πλαίσιο στο Excel;
• Πώς να κάνετε καρτέλα από το σύνθετο πλαίσιο για να επιλέξετε συγκεκριμένο κελί στο Excel;