[Resolvido] Transferir dados de colunas

2024 - VBA & Macros

Post Recente por Castoldi 4 anos atrás

3 Posts

2 Usuários

1 Reactions

1,097 Visualizações

RSS

Castoldi

(@castoldi)

Posts: 2

New Member

Topic starter

Bom dia pessoal, estou usando a macro abaixo para transferir os dados da Plan1 para a Planilha1 a COLUNA A. Porém preciso transferir os dados da coluna B,C,D também, porém preciso transferir os dados das colunas para a Planilha1 nessa ordem: A-D-C-B.

Alguem poderia me ajudar?

Sub copiarDadosEntrePlanilhas()
Sheets("Plan1").Range("A:A").Copy
Sheets("Planilha1").Activate
Range("A1").Select
ActiveSheet.Paste
Application.CutCopyMode = False

End Sub

Editado pela Moderação. Motivo: Procure utilizar o botão Código (< >) sempre que for inserir código VBA ou Fórmulas.

Postado : 03/09/2020 12:11 pm

DeyvidBR

(@deyvidbr)

Posts: 10

Active Member

Sheets("Plan1").Range("A:A").Copy
Sheets("Planilha1").Activate
Range("A1").Select
ActiveSheet.Paste
Application.CutCopyMode = False

Sheets("Plan1").Range("d:d").Copy
Sheets("Planilha1").Activate
Range("b1").Select
ActiveSheet.Paste
Application.CutCopyMode = False

Sheets("Plan1").Range("c:c").Copy
Sheets("Planilha1").Activate
Range("c1").Select
ActiveSheet.Paste
Application.CutCopyMode = False

Sheets("Plan1").Range("b:b").Copy
Sheets("Planilha1").Activate
Range("d1").Select
ActiveSheet.Paste
Application.CutCopyMode = False