Notifications
Clear all

Copiar intervalo para outro intervalo na mesma plan

3 Posts
2 Usuários
0 Reactions
643 Visualizações
(@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:

Dê retorno.

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

 
Postado : 04/10/2013 3:32 pm
(@dimorais)
Posts: 431
Reputable Member
Topic starter
 

Boa noite
Meu nobre Patropi, grato pela macro. 100% de aproveitamento. :lol:

 
Postado : 04/10/2013 6:53 pm