Excel - VBA/Macro para colar valores especial

[Milla17]

Olá

 

Gostaria da ajuda de vocês para alterar a macro abaixo de forma que ela cole valores, ela foi feita para copiar um intervalo de células em uma aba e colar em outra. 

A aba eu estou copiando tem muitas fórmulas, e como a macro que eu tenho não usa o colar especial - valores, muitas informações não aparecem na outra aba.  

 

Sub CopiarDadosEntrePlanilhas()
'copiar dados
Sheets("TUs").Range("a3:u45").Copy
'ativa a planilha de destino
Sheets("Sheet2").Activate
'seleciona o intervalo de destino
Range("a3").Select
'cola os dados no destino
ActiveSheet.Paste

Application.CutCopyMode = False

End Sub

 

 

agradeço a ajuda

[diego_janjao]

@Milla17 Altere seu código para este:

 

Sub CopiarDadosEntrePlanilhas()
'copiar dados
Sheets("TUs").Range("a3:u45").Copy
'ativa a planilha de destino
Sheets("Sheet2").Activate
'seleciona o intervalo de destino
Range("a3").Select
'cola os dados no destino
ActiveSheet.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
        :=False, Transpose:=False
Application.CutCopyMode = False
End Sub

 

[Milla17]

Ainda não rolou, aparece : can't execute a code in break mode

[diego_janjao]

@Milla17 poderia disponibilizar o arquivo?

[Milla17]

  Em 21/03/2017 às 15:08, diego_janjao disse:

@Milla17 poderia disponibilizar o arquivo?

Expandir  

Segue anexo um exemplo, tem basicamente o que eu preciso copiar, se você olhar a aba destino é como aparece quando uso a macro que eu te mostrei. Essa macro já está na primeira aba, só colar no vba.

 

obrigada

TESTE.xlsx

[diego_janjao]

@Milla17 segue o arquivo:

 

TESTE.7zBuscando informações...

[Milla17]

  Em 22/03/2017 às 06:09, diego_janjao disse:

@Milla17 segue o arquivo:

 

TESTE.7zBuscando informações...

Expandir  

 

Diego ajudou muito sua fórmula, realmente desta vez colou valores, mas não estava colando a formatação da tabela(eu apaguei tudo e testei de volta), daí eu juntei as duas macros, aquela que eu estava usando para colar a formatação e a sua para colar as informações! daí deu certo, só que aparece erro 400 depois de colar, por que será?

espero que funcione quando eu testar amanhã no trabalho.

TESTE.7zBuscando informações...

[Milla17]

  Em 22/03/2017 às 06:09, diego_janjao disse:

@Milla17 segue o arquivo:

 

TESTE.7zBuscando informações...

Expandir  

 

Diego, mesmo usando a estratégia acima, não funcionou na tabela planilha que eu uso no trabalho, não tô consigo. Acho que deve ser por causa das células mescladas. Segue anexo uma outra planilha mais proxima da que eu uso.

Please, me dá um help mais dessa vez? 

 

 

maisumatentativa.xlsx

[diego_janjao]

  Em 04/04/2017 às 21:59, Milla17 disse:

 

Diego, mesmo usando a estratégia acima, não funcionou na tabela planilha que eu uso no trabalho, não tô consigo. Acho que deve ser por causa das células mescladas. Segue anexo uma outra planilha mais proxima da que eu uso.

Please, me dá um help mais dessa vez? 

 

 

maisumatentativa.xlsxBuscando informações...

Expandir  

Verifique se este te atende:

maisumatentativa.7z

[Milla17]

  Em 05/04/2017 às 02:01, diego_janjao disse:

Verifique se este te atende:

maisumatentativa.7z

Expandir  

Infelizmente não Diego, eu preciso que a tabela seja copiada..

[diego_janjao]

  Em 06/04/2017 às 20:27, Milla17 disse:

Infelizmente não Diego, eu preciso que a tabela seja copiada..

Expandir  

como assim? Não entendi o que deseja.

[Milla17]

  Em 06/04/2017 às 20:50, diego_janjao disse:

como assim? Não entendi o que deseja.

Expandir  

a ultima macro que você me enviou grava as informaçoes da pessoa na plan 1, linha por linha.

Eu preciso que a tabela seja copiada para uma outra aba, pois sempre que eu digitar o nº da pessoa vai aparecer as informações referentes a ela, e daí eu tenho que repassar essa tabela para o chefe dele por exemplo.. o que eu faço hj é copiar a aba com essa tabela para uma outra aba e daí eu seleciono a planilha em que ela está e copio novamente e colo como valores, daí as formulas desaparecem..

 

eu preciso de uma macro que copie e cole como valores automaticamente  

[diego_janjao]

ahhh, OK, hoje durante a madrugada eu faço isso para você (se eu entendi bem), pois meu notebook está sem Office

[Milla17]

  Em 06/04/2017 às 20:59, diego_janjao disse:

ahhh, OK, hoje durante a madrugada eu faço isso para você (se eu entendi bem), pois meu notebook está sem Office

Expandir  

Muuito obrigada pela ajuda

[diego_janjao]

@Milla17 Acredito que agora esteja certo.

 

O arquivo gera uma nova planilha, copia e cola a tabela e somente os valores e abre a janela de Salvar Como para você escolher onde quer salvar.

 

maisumatentativa.7zBuscando informações...