Come ottenere il valore in una cella in Visual Basic

May 17

Il potere di Visual Basic è la capacità di creare procedure automatiche semplicemente registrarli sul vostro foglio di calcolo. Ad esempio, se si desidera ottenere il valore di una cella in Visual Basic, è possibile creare una procedura semplice e registrarla come una macro. In seguito è possibile eseguire la macro per fare automaticamente il lavoro si sarebbe altrimenti fare manualmente attraverso la tastiera. Ancora più potente è il passo successivo: Creazione di altre procedure che possono utilizzare la procedura che avete appena creato. Anche se probabilmente sarà necessario alla fine scrivere del codice in Visual Basic Editor, è possibile risparmiare un sacco di tempo per lasciare che il computer di generare il codice.

istruzione

Ottenere il valore di una copia semplice

1 Vai a cella A4 in un nuovo foglio di lavoro di Excel e digitare "10" Fare clic su "Strumenti", selezionare "Macro", e selezionare "Registra nuova macro." Inserire "Macro1" per il nome macro. Fai clic su "OK".

2 Fare clic sulla cella "A4". Tenere premuto il tasto "Ctrl" e premere il tasto "C" Premere il quadrato blu sotto la scritta STOP sul pannello a comparsa per interrompere la registrazione della macro.

3 Guardare il codice che avete creato facendo clic su "Strumenti", "Macro" e "macro". Fai clic su "Modifica". Verificare che il codice simile a questa:

Sub Macro1 ()
'
'Macro Macro1
'
'

Range("A4").Select
Selection.Copy

End Sub

Ottenere il valore utilizzando una cella di riferimento

4 Avviare una nuova cartella di lavoro di Excel selezionando "Nuovo" dal menu File. Vai alla cella A3 e inserire "15" Fare clic su "Strumenti", selezionare "Macro", e selezionare "Registra nuova macro." Inserire "Macro2" per il nome macro. Fai clic su "OK".

5 Fare clic sulla cella "A4". Tipo "= A3" e premere "Invio". Premere il quadrato blu sotto la parola "Stop" sul pannello a comparsa per interrompere la registrazione della macro.

6 Guardare il codice che avete creato facendo clic su "Strumenti", "Macro" e "macro". Selezionare "Macro2" e fare clic su "Modifica". Verificare che il codice simile a questa:

Sub Macro2 ()
'
'Macro Macro2
'
'

Range("A4").Select
ActiveCell.FormulaR1C1 = "=R[-1]C"
Range("A5").Select

End Sub