VBA - Copiar e colar vários lançamentos dentro de várias linhas ignorando espaços em branco.

[Cassio Barros]

Olá, galera! Tudo bem? Espero que sim. 

Preciso de uma grande ajuda de vocês...vamos lá! 

Eu tenho uma planilha que contém uma aba de lançamentos contábeis de 21 empresas. 

Vocês teriam um código de VBA pra me ajudar a copiar e colar os lançamentos automaticamente de todas as empresas? 

A ideia seria o código passar pela lista do número de cada empresa, copiar os lançamentos e colar a partir da linha 42. 

Por exemplo: 

(Segue o Print).

Quando ele copiar e colar esses lançamentos na linha 42, a próxima empresa ele já não poderia colar na mesma linha, aí já seria a partir da linha 51 e assim sucessivamente. 

Outra coisa também, nos lançamentos, na linha 2 até a 40 tem fórmula, ou seja, algumas coisas aparecem e outras não. 

O código que eu tentei ficava puxando todo o intervalo com as informações e o que estava em branco, mas era por causa da fórmula. 

Poderiam me ajudar, por favor?