Come aprire un foglio di lavoro specifico in base al valore selezionato di una casella combinata in Excel?

Supponendo di avere una casella combinata che contiene tutti i nomi dei fogli della cartella di lavoro corrente come mostrato nell'immagine sottostante. E ora, vuoi aprire un foglio di lavoro specifico quando selezioni il nome del foglio corrispondente in una casella combinata. Come ottenerlo? Il metodo in questo articolo può aiutarti.

Apri un foglio di lavoro specifico in base al valore selezionato di una casella combinata con codice VBA

Apri un foglio di lavoro specifico in base al valore selezionato di una casella combinata con codice VBA

Il codice VBA sottostante può aiutarti ad andare a un foglio di lavoro specifico in base alla selezione della casella combinata in Excel. Si prega di fare quanto segue.

Note:: Se la casella combinata non contiene alcun nome di foglio nel foglio di lavoro, segui il suggerimento seguente per aggiungere rapidamente tutti i nomi dei fogli a quella casella combinata. E se è già presente una casella combinata contenente tutti i nomi dei fogli, passare al file step 1 direttamente.

Consiglio: Inserire un pulsante di comando 1 nel foglio di lavoro, fare clic con il pulsante destro del mouse e selezionare Visualizza codice dal menu di scelta rapida. Quindi copia e incolla il codice VBA sottostante nel file Code finestra e premere il pulsante altro + Q i tasti per chiudere il file Microsoft Visual Basic per l'applicazione finestra. Fare clic sul pulsante di comando inserito, quindi tutti i nomi dei fogli della cartella di lavoro corrente verranno aggiunti automaticamente al ComboBox1.

Codice VBA: aggiungi facilmente tutti i nomi dei fogli in una casella combinata

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

Se è già presente una casella combinata contenente tutti i nomi dei fogli, eseguire le operazioni seguenti.

1. Accendi il Modalità di progettazione sotto il Costruttori scheda.

2. Fare clic con il pulsante destro del mouse sulla casella combinata con i nomi dei fogli, quindi fare clic su Visualizza codice dal menu di scelta rapida.

3. Quindi il file Microsoft Visual Basic, Applications Edition si apre la finestra, sostituire il codice VBA originale nella finestra del codice con il codice VBA sottostante.

Codice VBA: apri un foglio di lavoro specifico in base al valore selezionato della casella combinata

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

Note:: nel codice, ComboBox1 è il nome della casella combinata che contiene i nomi dei fogli.

4. premi il altro + Q i tasti per chiudere il file Microsoft Visual Basic, Applications Edition finestra e disattivare il Modalità di progettazione sotto il Costruttori scheda.

Ora, quando si seleziona qualsiasi nome di foglio di lavoro nella casella combinata, il foglio di lavoro corrispondente verrà aperto automaticamente.

Articoli correlati:

• Come copiare il valore della casella combinata nella cella attiva in Excel?
• Come visualizzare il formato della data nell'output della casella combinata in Excel?
• Come nascondere o mostrare un pulsante di comando in base al valore di cella specificato in Excel?
• Come impedire o disabilitare la digitazione in una casella combinata in Excel?
• Come uscire dalla casella combinata per selezionare una cella specifica in Excel?