Vba: como copiar um intervalo para outra planilha

Você pode usar a seguinte sintaxe no VBA para copiar um intervalo de células para outra planilha:

 Sub CopyRangeToSheet()

Worksheets(" Sheet1 ").Range(" A1:C11 ").Copy
Worksheets(" Sheet2 ").Range(" A1 ").PasteSpecial

Application.CutCopyMode = False

End Sub

Esta macro específica irá copiar as células no intervalo A1:C11 de Sheet1 e colá-las no intervalo começando na célula A1 de Sheet2 .

Nota : A linha Application.CutCopyMode = False especifica que o modo de corte e cópia deve ser desabilitado após a execução da macro.

O exemplo a seguir mostra como usar essa sintaxe na prática.

Exemplo: copiar intervalo para outra planilha usando VBA

Digamos que temos os seguintes dados definidos em uma planilha chamada Plan1 no Excel que contém informações sobre vários jogadores de basquete:

Vamos supor que também temos outra planilha chamada Sheet2 que está vazia no momento:

Digamos que queremos copiar todos os valores do intervalo A1:C11 de Sheet1 e colá-los começando na célula A1 de Sheet2 .

Podemos criar a seguinte macro para fazer isso:

 Sub CopyRangeToSheet()

Worksheets(" Sheet1 ").Range(" A1:C11 ").Copy
Worksheets(" Sheet2 ").Range(" A1 ").PasteSpecial

Application.CutCopyMode = False

End Sub

Quando executamos esta macro, recebemos a seguinte saída em Sheet2 :

Observe que todos os valores no intervalo A1:C11 de Sheet1 foram copiados para Sheet2 da célula A1 .

Por padrão, os valores foram colados com a formatação original.

Por exemplo, os valores das linhas do cabeçalho estão em negrito.

Se quiser colar apenas valores sem formatação de origem, você pode especificar Paste:=xlPasteValues da seguinte forma:

 Sub CopyRangeToSheet()

Worksheets(" Sheet1 ").Range(" A1:C11 ").Copy
Worksheets(" Sheet2 ").Range(" A1 ").PasteSpecial Paste=xlPasteValues

Application.CutCopyMode = False

End Sub

Quando executamos esta macro, recebemos a seguinte saída em Sheet2 :

Observe que apenas os valores (sem formatação) do intervalo A1:C11 de Sheet1 foram copiados para Sheet2 .

Nota : Você pode encontrar a documentação completa do método PasteSpecial do VBA aqui .

Recursos adicionais

Os tutoriais a seguir explicam como realizar outras tarefas comuns em VBA:

VBA: Como colar valores apenas sem formatação
VBA: Como copiar linhas visíveis para outra planilha
VBA: copie linhas para outra planilha com base em critérios