Criação de função em vba para loop no excel

Preciso que seja feito duas funções em vba que se resumem a loops.

A primeira função deve percorrer colunas (que são meses) e linhas (que são lojas) afim de coletar os dados como total de parcelas, valor de compra e taxas e montar uma base primaria. De preferencia, que o loop seja feito sem range.select para melhor desempenho, ou seja, utilizando with sheets e incremento com número inteiro.
O total de lojas e meses é relativo e pode variar.

A aba fonte é fixa.

A segunda função deve consumir a base primaria fazendo o desdobramento das parcelas em linhas. Exemplo: a primeira base irá resultar em 1440 linhas. Entao a segunda função deverá percorrer essas 1440 linhas afim de identificar as parcelas.

Na primeira linha, está informando que são 6 parcelas, isso significa que será montado uma nova base secundária com 4 linhas onde cada linha representa uma parcela.

Estou anexando um video explicando a atividade.
Reforço que o processo deve consumir a aba Projecao de Compra para montar a base em BaseParcelas_ProjecaoCompra na coluna P (primeira função). E em seguida, a base BaseParcelas_ProjecaoCompra deve consumir ela mesmo na coluna P para criar a base a partir da coluna A (segunda função).
Obs: no video, eu comecei o rateio com 0-30 mas o correto é que a primeira parcela seja 30-60 visto que 0-30 se aplica somente para quando for À VISTA

É importante que seja entregue o código em aberto.


Juntar ambas funções em uma rotina. Toda vez que chamar a rotina, a base BaseParcelas_ProjecaoCompra deverá  ter o conteúdo apagado (clearcontents) para carregar os novos dados. Cuidado para nao apagar o cabeçalho e não excluir a sheet pare recriar pois irá trará problemas nas formulas futuras.

Ou seja, tem que ser limpo o conteúdo da sheet de base.

Já estou anexando o arquivo excel onde deverá ser feito o trabalho.

Fecho com o primeiro que mandar um video com a solução direta no arquivo evidenciando que foi feito no vba e que os parametros como total de lojas e/ou total de meses a ser percorridos, estão sendo mapeados de forma automatica.