mmrs
-
Posts
3 -
Cadastrado em
-
Última visita
Tipo de conteúdo
Artigos
Selos
Fabricantes
Livros
Cursos
Análises
Fórum
posts postados por mmrs
-
-
-
Pessoal, tenho uma coluna cheia de dados que se repetem de três em três, sendo eles "Nome do evento", "Data e hora" e "Local".
Exemplo:
COLUNA A
Evento X
19/01/2018 às 23:00
SAO PAULO - RUA GENERAL JARDIM, 45
Evento Y
02/02/2018 às 20:00
SANTOS - Aquario de Santos
Evento Z
10/02/2018 às 21:30
SAO PAULO - Espaço das Américas
Preciso de uma macro que copie os dados dessa coluna única e cole de três em três nas colunas com os nomes de cada item que coloquei acima.
Montei uma básica, mas daria muito trabalho para fazer com todos os dados, pois teria que repetir cada Range de cópia (três linhas) e colar em uma linha (transformar em três colunas).
Segue o que fiz:
Range("A1:A3").Select
Selection.Copy
Range("C2").Select
Selection.PasteSpecial Paste:=xlPasteAll, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=TrueRange("A4:A6").Select
Selection.Copy
Range("C3").Select
Selection.PasteSpecial Paste:=xlPasteAll, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=TrueSe alguém puder me ajudar, pouparia um trabalhão!
Super obrigado!
Sobre o Clube do Hardware
No ar desde 1996, o Clube do Hardware é uma das maiores, mais antigas e mais respeitadas comunidades sobre tecnologia do Brasil. Leia mais
Direitos autorais
Não permitimos a cópia ou reprodução do conteúdo do nosso site, fórum, newsletters e redes sociais, mesmo citando-se a fonte. Leia mais
Macro para copiar em colar transposto em um período
em Microsoft Office e similares
Postado
Incrível @CasaDoHardware !!
Muito obrigado!!