Devarias Colunas Para Uma Coluna
Página 1 de 1
Devarias Colunas Para Uma Coluna
Bom dia!!
Uma forma de unir (concatenar com espaço), os dados de várias colunas para uma única coluna.
Tente adaptar...
Uma forma de unir (concatenar com espaço), os dados de várias colunas para uma única coluna.
Tente adaptar...
- Código:
Sub DevariasColunasParaUmaColuna()
'Uma forma de unir os dados de várias colunas para uma única
Dim x, i&
With Range("A1").CurrentRegion
x = .Value
For i = 1 To UBound(x)
x(i, 1) = Join(Application.Index(x, i, 0))
Next i
.ClearContents
.Columns(1).Value = x
End With
End Sub
alexandrevba- Intermediário
- Mensagens : 222
Data de inscrição : 26/06/2012
Localização : Serra-ES
Tópicos semelhantes
» Macro para conferir duas colunas
» Copiar duas células fixa de todas as guias para uma única guia, mas colando em duas colunas diferentes.
» Procurar valor em coluna baseado em célula
» Colorir Valor Duplicado Comparando outra Coluna
» Classifica baseado na coluna A de todas as guias usando um loop com AutoFiltro
» Copiar duas células fixa de todas as guias para uma única guia, mas colando em duas colunas diferentes.
» Procurar valor em coluna baseado em célula
» Colorir Valor Duplicado Comparando outra Coluna
» Classifica baseado na coluna A de todas as guias usando um loop com AutoFiltro
Página 1 de 1
Permissões neste sub-fórum
Não podes responder a tópicos
|
|