Un pulsante di selezione può essere utilizzato per incrementare un numero in una cella. Per creare un pulsante di selezione 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 selezione.
3. Trascina un pulsante di selezione sul foglio di lavoro.
4. Fare clic con il pulsante destro del mouse sul pulsante di selezione (assicurarsi che sia selezionata la modalità di progettazione).
5. Fare clic su Visualizza codice.
Nota: puoi modificare 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à. Per ora, lasceremo SpinButton1 come nome del pulsante di selezione.
6. Per collegare questo pulsante di selezione a una cella, aggiungi la seguente riga di codice.
Range("C3").Value = SpinButton1.Value
7. È possibile impostare un massimo e un minimo aggiungendo le seguenti righe di codice.
SpinButton1.Max = 100
SpinButton1.Min = 0
8. Per modificare il valore incrementale, utilizzare la proprietà SmallChange.
SpinButton1.SmallChange = 2
9. Fare clic sulle frecce del pulsante di selezione (assicurarsi che Modalità progettazione sia deselezionata).
Risultato:
Nota: invece di modificare le proprietà del pulsante di selezione in fase di esecuzione, è anche possibile modificare le proprietà in fase di progettazione. Per ottenere ciò, fai clic con il pulsante destro del mouse sul pulsante di selezione (assicurati che sia selezionata la modalità di progettazione) e fai clic su Proprietà.
