/ / Casella di riepilogo VBA di Excel

Casella di riepilogo VBA di Excel

Una casella di elenco è un elenco da cui un utente può selezionare un elemento. Per creare un casella di riepilogo nel Excel VBA, eseguire i seguenti passaggi.

1. Nella scheda Sviluppatore, fare clic su Inserisci.

2. Nel gruppo Controlli ActiveX, fare clic su Casella di riepilogo.

Creare una casella di riepilogo in VBA di Excel

3. Trascinare una casella di riepilogo sul foglio di lavoro.

Trascina una casella di elenco

Nota: è possibile modificare il nome di un controllo facendo clic con il pulsante destro del mouse sul controllo (assicurarsi che la Modalità progettazione sia selezionata) e quindi fare clic su Proprietà. Per ora, lasceremo ListBox1 come nome della casella di riepilogo.

Crea un evento di apertura di una cartella di lavoro. Il codice aggiunto all'Evento di apertura della cartella di lavoro verrà eseguito da VBA di Excel quando si apre la cartella di lavoro.

4. Aprire il Visual Basic Editor.

5. Fare doppio clic su questa cartella di lavoro in Esplora progetti.

6. Seleziona cartella di lavoro dall'elenco a discesa a sinistra e scegli Apri dall'elenco a discesa a destra.

Cartella di lavoro Evento aperto in VBA di Excel

7. Per aggiungere elementi alla casella di riepilogo, aggiungere le seguenti linee di codice all'Evento di apertura della cartella di lavoro:

With Sheet1.ListBox1
    .AddItem "Paris"
    .AddItem "New York"
    .AddItem "London"
End With

Nota: utilizzare Sheet2 se la casella di riepilogo si trova nel secondo foglio di lavoro, Foglio3 se la casella di riepilogo si trova nel terzo foglio di lavoro, ecc. Se si utilizzano queste righe di codice all'esterno dell'evento Open di Workbook, è possibile aggiungere la seguente riga di codice prima di questi linee di codice. Questa riga di codice cancella la casella di riepilogo. In questo modo i tuoi articoli non verranno aggiunti più volte se esegui il tuo codice più di una volta.

ListBox1.Clear

8. Per collegare questa casella di riepilogo a una cella, fare clic con il pulsante destro del mouse sulla casella di riepilogo (assicurarsi che la modalità di progettazione sia selezionata) e fare clic su Proprietà. Compila D3 per LinkedCell.

LinkedCell

Nota: vedere anche la proprietà ListFillRange per riempire una casella di riepilogo con un intervallo di celle.

9. Salvare, chiudere e riaprire il file Excel.

Risultato:

Casella di riepilogo

Sebbene in alcune situazioni possa essere utile posizionare direttamente una casella di riepilogo sul foglio di lavoro, una casella di riepilogo è particolarmente utile quando viene inserita in un modulo utente.

Leggi anche: