Notifications
Clear all

Copiar intervalo - inicio e fim é o resultado de fórmulas

4 Posts
2 Usuários
0 Reactions
974 Visualizações
(@frozza)
Posts: 0
New Member
Topic starter
 

Olá Pessoal
Sou novo em VBA e preciso MUITOOOO da ajuda de vcs...
já tentei vários códigos, pesquisei em vários lugares e até agora nada...

Resumo do problema: Preciso selecionar e copiar as linhas inteiras de um intervalo.

Até aí é facil, o problema é que o início e o fim do intervalo são variáveis, pois eu copio e colo na planilha os dados de páginas da internet e destes dados (muitos dados) preciso encontrar o que me interessa e copiá-los.

Por conta disso, o intevalo pode ser de A50 até A122, ou de A30 até A41, de A25 até A42 etc... O intervalo nunca terá inicio nem fim fixos, pois dependem da quantidade de dados extras que são copiados das páginas.

Já consegui a fórmula que identifica os intervalos para cada situação, agora só preciso de um código que entenda que o início e o fim a serão o resultado das formulas.

Detalhe, tanto acima, quanto abaixo do intevalo de interesse existem inúmeras celulas preenchidas.

Apenas para fins de referência, vamos convencionar que as fórmulas que calculam o inicio e o fim do intervalo estão e A1 e A2 e que os dados são colados de A3 para baixo.

Obrigado a todos!!
FROZZA

 
Postado : 06/03/2018 8:03 pm
(@osvaldomp)
Posts: 857
Prominent Member
 

Veja se ajuda.

Range([A1] & ":" & [A2]).Copy [A3]
 
Postado : 06/03/2018 8:20 pm
(@frozza)
Posts: 0
New Member
Topic starter
 

Osvaldomp, boa noite!
Inicialmente agradeço pelo interesse em ajudar.
Sua resposta ajudou MUITO sim, pois com ela consegui copiar o intervalo indicado nas celulas A1 e A2, todavia, preciso selecionar e copiar as linhas inteiras do intervalo pois nas colunas b,c, etc tb existem informações que são de interesse.

Grande abraço

 
Postado : 06/03/2018 9:00 pm
(@osvaldomp)
Posts: 857
Prominent Member
 

... todavia, preciso selecionar e copiar as linhas inteiras ~~~> em macros não é necessário "selecionar", ao contrário, é recomendável não selecionar; ainda, em cada linha inteira há 16.384 células, é improvável que você queira copiar as linhas inteiras

...do intervalo pois nas colunas b,c, etc tb existem informações que são de interesse. ~~~> b, c, etc ~~~> as referências devem ser precisas, "etc" não é uma referência válida para coluna

O comando abaixo copia/cola da coluna A até a H.

Range([A1] & ":" & [A2]).Resize(, 8).Copy [A3]

Se o resultado não for o desejado eu sugiro que você disponibilize uma amostra do seu arquivo Excel com alguns dados, com as células A1 e A2 preenchidas e com o resultado desejado.

 
Postado : 07/03/2018 4:25 am