Come popolare una ComboBox di UserForm con tutti i nomi dei fogli in Excel?

Questo articolo parla di come inserire tutti i nomi dei fogli della cartella di lavoro corrente in una ComboBox di UserForm in Excel.

Popola una ComboBox di UserForm con tutti i nomi dei fogli utilizzando il codice VBA

Popola una ComboBox di UserForm con tutti i nomi dei fogli utilizzando il codice VBA

Il seguente codice VBA può aiutarti a inserire tutti i nomi dei fogli della cartella di lavoro corrente in una ComboBox di UserForm. Procedi come segue.

1. Premi contemporaneamente i tasti Alt + F11 per aprire la finestra Microsoft Visual Basic for Applications.

2. Nella finestra Microsoft Visual Basic for Applications, inserisci una UserForm facendo clic su Inserisci > UserForm come mostrato nello screenshot qui sotto.

3. Successivamente, disegna e inserisci un controllo ComboBox nella UserForm. Vedi screenshot:

4. Fai clic con il tasto destro sulla ComboBox inserita e seleziona Visualizza Codice dal menu contestuale. Vedi screenshot:

5. Nella finestra Microsoft Visual Basic for Applications che si apre, copia e incolla il seguente codice VBA per sostituire quello originale nella finestra del Codice.

Codice VBA: Popola una ComboBox di UserForm con tutti i nomi dei fogli della cartella di lavoro corrente

Private Sub UserForm_Initialize()
    Dim I As Long
    Me.ComboBox1.Clear
    For I = 1 To Sheets.Count
        Me.ComboBox1.AddItem Sheets(I).Name
    Next
    Me.ComboBox1.Value = ActiveSheet.Name
End Sub

Nota: Nel codice, ComboBox1 è il nome della ComboBox inserita. Cambialo con quello che hai utilizzato tu.

6. Premi il tasto F5 per eseguire il codice. Nella UserForm che si apre, puoi vedere che tutti i nomi dei fogli della cartella di lavoro corrente vengono visualizzati nella ComboBox come mostrato nello screenshot qui sotto:

Articoli correlati:

• Come copiare il valore della Casella Combinata nella cella attiva in Excel?
• Come visualizzare il formato data nell'output della casella combinata in Excel?
• Come aprire un foglio di lavoro specifico in base al valore selezionato di una Casella Combinata 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?