Copiar intervalo para outro intervalo na mesma plan

2024 - VBA & Macros

Post Recente por dimorais 11 anos atrás

3 Posts

2 Usuários

0 Reactions

638 Visualizações

RSS

dimorais

(@dimorais)

Posts: 431

Reputable Member

Topic starter

Até encontrei na pesquisa do fórum o que precisava (pelo titulo) mas o arquivo não abriu, estava corrompido, então...
Fiz o que precisava com o gravador de macros ficou certinho, o problema é que quando a macro roda dá aquele "tranco" na planilha. A macro se alguém se dispuser a fazer, precisa copiar um intervalo dado (somente valores) para outro intervalo na mesma plan.
Grato

Postado : 04/10/2013 1:02 pm

Fernando Fernandes

(@fernandofernandes)

Posts: 43750

Illustrious Member

Boa noite Dimorais

Experimente este código: ( Tem que adaptar para o teu intervalo)

Sub Patropi()
Application.ScreenUpdating = False
Range("A1:D6").Select
Selection.Copy
Range("G1").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Application.ScreenUpdating = True
Application.CutCopyMode = False
End Sub

Baixe uma planilha de exemplo:

04_10_13_Macro copiar colar valores-Patropi.zip

Dê retorno.

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

Postado : 04/10/2013 3:32 pm