Juntar abas do excel depois de converter do PDF

[rodrigo.carvalh]

Pessoal minha 2 dúvida:
Converti uma planilha de PDF para excel, so que o sistema separa por páginas. Gostaria de colocar tudo em uma unica aba (ou pagina), pois são 172 e copiar e colar fica dureza...
OBS: possuem o mesmo conteudo, pois é uma sequencia de classificados.

Se alguem puder me ajudar segue planilha: https://www.sendspace.com/file/j9vzk6

Obrigado. 

 

 

ESSA AQUI.xlsx

[Visitante]

Rodrigo se quiser experimente este código. O conteúdo de cada planilha da 'Page 2' até a 'Page 143' será copiado para a planilha 'Page 1'.
Veja se é esse o resultado desejado.

Instale o código abaixo em um módulo comum, assim:
1. copie o código daqui
2. a partir da planilha em que estão os dados tecle 'Alt+F11' para acessar o editor de VBA
3. no menu do editor >> Inserir >> Módulo
4. cole o código na janela em branco que vai se abrir
5. feito! 'Alt+Q' para retornar para a planilha e testar

para rodar o código:
6. tecle 'Alt+F8' >> selecione a macro correspondente >> Executar, ou insira um botão na planilha e vincule-o à macro ou vincule-a a um atalho de teclado (Alt+F8 > Opções).


 

Sub TudoNaPage1() Dim k As Long  For k = 2 To 143   With Sheets("Page 1")    .Range("A" & Rows.Count).End(xlUp).Offset(1).Resize(29, 11).Value = _      Sheets("Page " & k).Range("A7:K35").Value   End With  Next kEnd Sub

 

[rodrigo.carvalh]

Muito bom ! 
 

Deu Super Certo ...

Obrigado ;D