Se si dispone di più di un pulsante di opzione, è possibile selezionare solo uno dei pulsanti di opzione. Creare pulsanti di opzione in Excel VBA, eseguire i seguenti passaggi.
1. Nella scheda Sviluppatore, fare clic su Inserisci.
2. Nel gruppo Controlli ActiveX, fare clic su Pulsante di opzione.
3. Trascina due pulsanti di opzione sul foglio di lavoro.
4. Fare clic con il pulsante destro del mouse sul primo pulsante di opzione (assicurarsi che sia selezionata la modalità di progettazione).
5. Fare clic su Visualizza codice.
Nota: puoi modificare la didascalia e il nome di un controllo facendo clic con il pulsante destro del mouse sul controllo (assicurati che sia selezionata la modalità di progettazione) e quindi facendo clic su Proprietà. Cambia le didascalie dei pulsanti di opzione in Femmina e Maschio. Per ora, lasceremo OptionButton1 e OptionButton2 come nomi dei pulsanti di opzione.
6. Aggiungi la seguente riga di codice:
If OptionButton1.Value = True Then Range("D3").Value = 10
7. Fare clic con il pulsante destro del mouse sul secondo pulsante di opzione (assicurarsi che sia selezionata la modalità di progettazione).
8. Fare clic su Visualizza codice.
9. Aggiungi la seguente riga di codice:
If OptionButton2.Value = True Then Range("D3").Value = 20
10. Fare clic sui pulsanti di opzione sul foglio (assicurarsi che Modalità progettazione sia deselezionata).
Risultato:
Sebbene in alcune situazioni possa essere utile posizionare direttamente i pulsanti di opzione sul foglio di lavoro, i pulsanti di opzione sono particolarmente utili se posizionati su un modulo utente.
