Excel Sintaxe para indicar variável

[Wilson Cardoso]

Achei essa sintaxe no site da microsoft, mas eu gostaria de fazer uma com variável, onde ele comece a contar a partir da última linha da coluna "H".

 

Estou fazendo um cadastro para aluguéis, onde ao fazer o cadastro, irá preencher os meses de locação do imóvel utilizando o "Type:=xlFillMonths".

 

Set sourceRange = Range("A1:A2")

Set fillRange = Range("A1:A20")

SourceRange.AutoFill Destination:=fillRange

[Muca Costa]

    Dim P As String
    P = Planilha1.Cells(Rows.Count, 8).End(xlUp).Row
    Set SourceRange = Worksheets("Planilha1").Range("H1:H" & P)
    Set fillRange = Worksheets("Planilha1").Range("H1:H30")
    SourceRange.AutoFill Destination:=fillRange

[Wilson Cardoso]

Funcionou, porém tenho que colocar por exemplo, a pessoa vai ficar 12 meses, no formulário tenho para preencher a quantidade de meses e gostaria de preencher apenas esses meses. No caso 12 linhas abaixo da última.
Obrigado!

[Muca Costa]

Desculpe, não entendi!

Seria melhor anexar um exemplo do que pretende...

[Wilson Cardoso]

Seguinte, uma pessoa vai alugar por 3 meses, nesse formulário tem a opção de adicionar lá na tabela o dia de vencimento e quantos meses a pessoa vai ficar.

Por exemplo: dia de vencimento

10.05.2020

10.06.2020

10.07.2020

 

A próxima pessoa que vai alugar, vai ficar 2 meses, gostaria que o código adicionasse abaixo desses.

10.08.2020

10.09.2020

[Muca Costa]

Veja o anexo, click no botão para acrescentar...

PreenchimentoAutomático-002.rar

[Wilson Cardoso]

Isso, muito obrigado!!!