Una casella combinata è un elenco a discesa dal quale un utente può selezionare un elemento o un riempimento nel suo / sua scelta. Per creare una casella combinata in Excel VBA, eseguire le seguenti operazioni.

  1. Nella scheda Sviluppatore, fare clic su Inserisci.

  2. Nel gruppo Controlli ActiveX, fare clic su Casella combinata.

Create a combo box in Excel VBA

  1. Trascinare una casella combinata nel foglio di lavoro.

Drag a Combo Box

Nota: è possibile modificare il nome di un controllo facendo clic destro sul comando (assicurarsi che sia selezionata la modalità Design) e facendo clic su Proprietà. Per il momento, lasceremo ComboBox1 come il nome della casella combinata.

Creare una cartella di lavoro Open Event. Codice aggiunto alla cartella di lavoro Open Event sarà eseguito da Excel VBA quando si apre la cartella di lavoro.

  1. Aprire il Visual Basic Editor.

  2. Fare doppio clic su questa cartella di lavoro in Esplora il progetto.

  3. Scegliere cartella di lavoro dall’elenco a discesa a sinistra e selezionare Apri dal menu a discesa a destra.

Workbook Open Event in Excel VBA

  1. Per aggiungere elementi alla casella combinata, aggiungere le seguenti righe di codice alla cartella di lavoro Open Event:

With Sheet1.ComboBox1

.AddItem "Paris"

.AddItem "New York"

.AddItem "London"

End With

Nota: utilizzare Foglio2 se la casella combinata è situato al secondo foglio di lavoro, Foglio3 se la casella combinata è situato al terzo foglio di lavoro, ecc Se si utilizzano queste righe di codice al di fuori della manifestazione cartella di lavoro aperta, si potrebbe desiderare di aggiungere le linee di codice qui sotto prima di queste righe di codice. La prima riga di codice cancella la casella combinata. In questo modo i tuoi articoli non verranno aggiunti più volte se si esegue il codice più di una volta. La seconda riga di codice cancella la propria scelta.

ComboBox1.Clear

ComboBox1.Value = ""

  1. Per collegare questa casella combinata a una cella, fare clic destro sulla casella combinata (assicurarsi che sia selezionata la modalità di progettazione sicuro) e fare clic su Proprietà. Compilare D2 per LinkedCell.

LinkedCell

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

  1. Salvare, chiudere e riaprire il file di Excel.

Risultato:

Combo Box

Anche se in alcune situazioni può essere utile per inserire direttamente una casella combinata nel foglio di lavoro, una casella combinata è particolarmente utile quando sono immessi in un form utente.