O poder do Visual Basic é a capacidade de criar procedimentos automáticos simplesmente gravá-las em sua planilha. Por exemplo, se você deseja obter o valor de uma célula em Visual Basic, você pode criar um procedimento simples e gravá-lo como uma macro. Mais tarde você pode executar a macro para automaticamente fazer o trabalho que de outra forma iria fazer manualmente através do teclado. Ainda mais poderoso é o próximo passo : Criando outros procedimentos que podem utilizar o procedimento que você acabou de criar . Embora , provavelmente, será necessário eventualmente escrever um código no Editor do Visual Basic, você pode salvar um monte de tempo , permitindo que o computador gerar o código. Coisas que você precisa
Microsoft Excel VBA
Show Mais instruções
recebendo o valor de uma cópia simples
1

Ir para a célula A4 em uma nova planilha do Excel e digite " 10 ". Clique em " Ferramentas ", selecione " Macro " e selecione " Gravar Nova Macro . " Enter " Macro1 " para o nome da macro . Clique em " OK".
2

Clique na célula "A4 ". Segure a tecla " Ctrl " e pressione " C" Pressione o quadrado azul sob a palavra Stop no painel de pop-up para parar a gravação da macro.
3

Olhe para o código que você criou , clicando em " Ferramentas", " Macro , "e" Macros ". Clique em "Editar ". Confirme se o código é algo como isto :

Sub Macro1 ()'' '' Macro1 Macro Range (" A4 " ) SelectSelection.CopyEnd Sub
Obtendo o valor usando . uma referência de célula
4

Iniciar um novo livro do Excel , selecionando " New " no menu Arquivo. Ir para célula A3 e digite " 15 ". Clique em " Ferramentas ", selecione " Macro " e selecione " Gravar Nova Macro . " Enter " Macro2 " para o nome da macro . Clique em " OK".
5

Clique na célula "A4 ". Digite " = A3 " e pressione " Enter". Pressione o quadrado azul sob a palavra "Stop " no painel pop-up para parar a gravação da macro.
6

Olhe para o código que você criou , clicando em " Ferramentas", " Macro " e " Macros ". Selecione " Macro2 " e clique em " Editar". Confirme se o código é algo como isto: .

Sub Macro2 ()'' '' Macro2 Macro Range (" A4 " ) SelectActiveCell.FormulaR1C1 = " = R [-1] C " Range (" A5 " ) . SelectEnd Sub