Come copiare il valore della casella combinata nella cella attiva in Excel?
In alcuni casi, potrebbe essere necessario copiare il valore selezionato da una casella combinata nella cella attiva. Normalmente, è necessario entrare nella casella combinata, copiarla e incollarla manualmente nella cella attiva. Questo articolo introduce un metodo conveniente per aggiornare automaticamente la cella attiva durante la selezione dei valori in una casella combinata.
Copia il valore della casella combinata nella cella attiva con codice VBA
VBA 1: copia il valore della casella combinata nella cella attiva tramite Comando
VBA 2: copia automatica del valore della casella combinata nella cella attiva
Copia il valore della casella combinata nella cella attiva con codice VBA
I seguenti codici VBA possono aiutarti a copiare automaticamente il valore della casella combinata nella cella attiva. Si prega di fare quanto segue.
VBA 1: copia il valore della casella combinata nella cella attiva tramite il pulsante di comando
1. Innanzitutto, è necessario inserire un pulsante di comando nel foglio di lavoro come mostrato nell'immagine sottostante.
2. Fare clic con il pulsante destro del mouse sul pulsante di comando, quindi fare clic Visualizza codice dal menu di scelta rapida. Vedi screenshot:
3. Nel spuntare Microsoft Visual Basic, Applications Edition finestra, sostituire il codice originale nella finestra del codice con il codice VBA sottostante.
Codice VBA: copia il valore della casella combinata nella cella attiva
Private Sub CommandButton1_Click()
ActiveCell.Value = Me.ComboBox1.Text
End Sub
Note:: Nel codice, CommandButton1 è il nome del pulsante di comando inserito e ComboBox1 è il nome della casella combinata da cui copiare il valore. Si prega di cambiarli come necessario.
4. premi il altro + Q i tasti per chiudere il file Microsoft Visual Basic, Applications Edition finestra.
D'ora in poi, quando è necessario copiare il valore della casella combinata nella cella attiva, selezionare la cella, quindi fare clic sul pulsante di comando per farlo.
VBA 2: copia automatica del valore della casella combinata nella cella attiva
Il codice VBA sottostante può aiutarti ad aggiornare automaticamente la cella attiva mentre selezioni i valori in una casella combinata. Puoi fare come segue.
1. Assicurati che il Modalità di progettazione è attivato sotto Costruttori scheda.
2. Fare clic con il pulsante destro del mouse sulla casella combinata da cui copiare il valore, quindi fare clic Visualizza codice dal menu di scelta rapida. Vedi screenshot:
3. Nel spuntare Microsoft Visual Basic, Applications Edition finestra, sostituire il codice originale nel file Code finestra con il codice VBA sottostante.
Codice VBA: copia il valore della casella combinata nella cella attiva
Private Sub ComboBox1_Change()
ActiveCell.Value = Me.ComboBox1.Value
End Sub
Note:: Nel codice, ComboBox1 è il nome della casella combinata da cui copiare il valore.
4. premi il altro + Q tasti per chiudere la finestra di Microsoft Visual Basic, Applications Edition e disattivare la modalità di progettazione nella scheda Sviluppatore.
D'ora in poi, quando si seleziona il valore dalla casella combinata, il record selezionato verrà visualizzato automaticamente nella cella attiva.
Articoli correlati:
- Come visualizzare il formato della data nell'output della casella combinata in Excel?
- Come nascondere o mostrare un pulsante di comando in base al valore di cella specificato 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?
I migliori strumenti per la produttività in ufficio
Potenzia le tue competenze di Excel con Kutools per Excel e sperimenta l'efficienza come mai prima d'ora. Kutools per Excel offre oltre 300 funzionalità avanzate per aumentare la produttività e risparmiare tempo. Fai clic qui per ottenere la funzionalità di cui hai più bisogno...
Office Tab porta l'interfaccia a schede in Office e semplifica notevolmente il tuo lavoro
- Abilita la modifica e la lettura a schede in Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Apri e crea più documenti in nuove schede della stessa finestra, piuttosto che in nuove finestre.
- Aumenta la produttività del 50% e riduce ogni giorno centinaia di clic del mouse!