Como vincular uma caixa de texto a várias células no Excel?

Como todos sabemos, é fácil vincular uma caixa de texto a uma célula específica. Mas é possível vincular várias células à mesma caixa de texto, de modo que, ao clicar em diferentes células, a caixa de texto exiba textos diferentes? Este artigo irá ajudá-lo a resolver essa tarefa no Excel.

Vincular caixa de texto a várias células com código VBA

Vincular caixa de texto a várias células com código VBA

Para vincular uma caixa de texto a várias células, o seguinte código VBA pode ajudá-lo; por favor, faça o seguinte:

1. Primeiro, insira uma caixa de texto ActiveX na guia Desenvolvedor.

2. Em seguida, clique com o botão direito na aba da planilha que contém a caixa de texto que deseja usar e escolha Visualizar Código no menu de contexto. Na janela aberta do Microsoft Visual Basic for Applications, copie e cole o seguinte código no Módulo em branco:

Código VBA: vincular caixa de texto a várias células:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If Target.Column = 3 Then ActiveSheet.TextBox1.Text = Target
End Sub

Observação: No código acima, o número 3 indica o número da coluna onde suas células vinculadas estão localizadas, e Textbox1 é o nome da caixa de texto que você inseriu; altere-os conforme necessário.

3. Depois, salve e feche esta janela de código. Agora, quando você clicar em diferentes células, os valores diferentes serão exibidos automaticamente na caixa de texto, veja a captura de tela: