Vba: como obter o valor de uma célula de outra planilha

Você pode usar os seguintes métodos em VBA para obter o valor da célula em outra planilha:

Método 1: obter o valor de uma célula de outra planilha

 Sub GetCellAnotherSheet()
ActiveCell.Value = Worksheets(" Sheet2 ").Range(" A2 ") 
End Sub

Esta macro específica obterá o valor da célula A2 na Planilha2 e o retornará para a célula atualmente ativa.

Método 2: obter o resultado da operação de valores de células de outra planilha

Você também pode realizar uma operação nas células de outra planilha e retornar o resultado da operação na célula atualmente ativa.

Por exemplo, você pode usar a seguinte sintaxe para adicionar os valores no intervalo B2:B10 na Planilha2 e retornar a soma na célula atualmente ativa:

 Sub GetCellAnotherSheet()
ActiveCell.Value = WorksheetFunction.Sum(Worksheets(" Sheet2 ").Range(" B2:B10 "))
End Sub

Os exemplos a seguir mostram como usar cada método na prática.

Exemplo 1: Obtenha o valor de uma célula de outra planilha

Suponha que temos a seguinte planilha chamada Sheet2 , que contém informações sobre vários jogadores de basquete:

Suponha que a célula A2 na Planilha1 esteja atualmente selecionada como célula ativa.

Podemos criar a seguinte macro para obter o valor na célula A2 da Planilha2 e retorná-lo para a célula atualmente ativa:

 Sub GetCellAnotherSheet()
ActiveCell.Value = Worksheets(" Sheet2 ").Range(" A2 ") 
End Sub

Ao executarmos esta macro, podemos ver que o valor da célula A2 da Planilha1 agora está definido como “Mavs”, que corresponde ao valor da célula A2 da Planilha2 :

Exemplo 2: Obtenha o resultado da operação de valores de células de outra planilha

Vamos supor novamente que temos a seguinte planilha chamada Sheet2 que contém informações sobre vários jogadores de basquete:

Podemos usar a seguinte macro para somar os valores na coluna de pontos de Sheet2 e retornar o resultado para a célula atualmente ativa, que é a célula A2 de Sheet1 :

 Sub GetCellAnotherSheet()
ActiveCell.Value = WorksheetFunction.Sum(Worksheets(" Sheet2 ").Range(" A2 "))
End Sub

Ao executarmos esta macro, podemos observar que a soma dos valores do intervalo A2:A10 da Planilha2 agora são exibidos na célula A2 da Planilha1 :

Recursos adicionais

Os tutoriais a seguir explicam como realizar outras tarefas comuns em VBA:

VBA: Como definir o valor de uma célula em outra planilha
VBA: Como selecionar um intervalo em uma célula ativa
VBA: Como excluir linhas com base no valor da célula