Resumo
No Microsoft Excel, você pode usar uma macro para concatenar os dados em duas colunas adjacentes e exibir o resultado na coluna à direita das colunas que contêm seus dados. Este artigo contém um exemplo de macro do Microsoft Visual Basic for Applications (VBA) (sub procedimento) para realizar isso.
Informações adicionais
A Microsoft fornece exemplos de programação somente para ilustração, sem garantia expressa ou implícita. Isso inclui, mas não se limita a, as garantias implícitas de comercialização ou aptidão para uma finalidade específica. Este artigo pressupõe que você esteja familiarizado com a linguagem de programação que está sendo demonstrada e com as ferramentas usadas para criar e depurar procedimentos. Engenheiros de suporte da Microsoft podem ajudar a explicar a funcionalidade de um procedimento específico. No entanto, eles não modificarão esses exemplos para fornecer funcionalidade ou procedimentos de construção adicionais para atender aos seus requisitos específicos.
Macro de Visual Basic for Applications de exemplo (VBA)
Sub ConcatColumns()
Do While ActiveCell <> "" 'Loops until the active cell is blank.
'The "&" must have a space on both sides or it will be
'treated as a variable type of long integer.
ActiveCell.Offset(0, 1).FormulaR1C1 = _
ActiveCell.Offset(0, -1) & " " & ActiveCell.Offset(0, 0)
ActiveCell.Offset(1, 0).Select
Loop
End Sub
OBSERVAÇÃO: a instrução ActiveCell.Offset(0, 1). FormulaR1C1 pode ser substituído pela instrução ActiveCell.Offset(0, 1). Fórmula. Eles podem ser usados com igual sucesso se você estiver usando apenas texto e números (não fórmulas). O R1C1 usado no final da primeira instrução refere-se à linha um, coluna um e é o formulário usado em exemplos no Help.
Como usar a macro no Microsoft Office Excel 2007
-
Abra a pasta de trabalho que contém os dados.
-
Pressione ALT+F11 para iniciar o Editor do Visual Basic.
-
No menu Inserir , clique em Módulo para inserir um módulo. Digite a macro na janela de código do módulo.
-
No menu Arquivo , clique em Fechar e Retornar ao Microsoft Excel.
-
Selecione a planilha que contém os dados que você deseja concatenar.
-
Clique na célula superior na coluna direita dos dados que você deseja concatenar. Por exemplo, se as células A1:A100 e B1:B100 contiverem dados, clique na célula B1.
-
Clique na guia Desenvolvedor . Se a guia Desenvolvedor não for exibida, siga estas etapas:
-
Clique no Botão do Microsoft Office e clique em Opções do Excel.
-
Clique em Popular.
-
Clique para selecionar a guia Mostrar Desenvolvedor na caixa Marcar de Faixa de Opções.
-
Clique em OK para fechar a caixa de diálogo Opções do Excel .
-
-
Clique em Macros no grupo Código .
-
Selecione a macro ConcatColumns e clique em Executar.
Como usar a macro no Microsoft Office Excel 2003 e em versões anteriores do Excel
-
Abra a pasta de trabalho que contém os dados.
-
Pressione ALT+F11 para iniciar o Editor do Visual Basic.
-
No menu Inserir , clique em Módulo para inserir um módulo. Digite a macro na janela de código do módulo.
-
No menu Arquivo , clique em Fechar e Retornar ao Microsoft Excel.
-
Selecione a planilha que contém os dados que você deseja concatenar.
-
Clique na célula superior na coluna direita dos dados que você deseja concatenar. Por exemplo, se as células A1:A100 e B1:B100 contiverem dados, clique na célula B1.
-
No menu Ferramentas , aponte para Macros e clique em Macro. Selecione a macro ConcatColumns e clique em Executar.
