No caso de você precisar combinar várias colunas em uma coluna e não tiver a menor ideia, este artigo inteiro é para você. Neste artigo, aprenderemos como combinar várias colunas em uma coluna usando o código vba.
Do instantâneo abaixo: -
A seguir está o instantâneo da saída necessária: -
Precisamos seguir as etapas abaixo:
- Clique na guia Desenvolvedor
- No grupo Código, selecione Visual Basic
Insira o seguinte código no módulo padrão
Sub MultipleColumns2SingleColumn ()
Const shName1 As String = "Planilha1" 'Mude o nome da planilha aqui
Const shName2 As String = "Folha2"
Dim arr, arrNames
Com planilhas (shName1)
arrNames = .Range ("F1", .Cells (1, Columns.Count) .End (xlToLeft))
Para i = 2 para .Cells (Rows.Count, 1) .End (xlUp) .Row
arr = .Células (i, 1). Redimensionar (, 4)
Com planilhas (shName2)
Com .Cells (Rows.Count, 1) .End (xlUp)
.Offset (1) .Resize (UBound (arrNames, 2), 4) = arr
.Offset (1, 5) .Resize (UBound (arrNames, 2)) = Application.Transpose (arrNames)
Terminar com
Terminar com
Próximo
Terminar com
End Sub
Conforme você executa a macro; a macro irá transferir os dados de várias colunas para uma única coluna.
Desta forma, podemos combinar dados de várias colunas em uma única coluna.
