Macro para preenchimento de células com formulas distintas

[Brunna]

Olá...

Preciso de uma macro que preencha três células diferentes com as fórmulas:

=HOJE / =DIAS360 / =SE(...)

São nas colunas G;H;I respectivamente.

Porém, preciso que a forma seja executada apenas nas células linhas que estão preenchidas.

Por exemplo, hoje eu coloquei os dados nas linhas de 1 a 10, quero que a formula seja executada apenas nessas células. Amanhã eu alimento as linhas 10 a 15, quero que execute nessas linhas. 

É uma planilha de validades que é alimentada todos os dias mas, como ela é "infinita" (apenas uma planilha por ano), não tem como eu definir um intervalo específico, pois não tem como eu adivinhar quantos produtos terão no decorrer do ano. Sem contar que deixar as formulas nas células fica confuso. Só achei macros que preenches um intervalo especifico.  

 

Desde já agradeço. 

[boobymcgee]

Você pode selecionar o intervalo por uma inputbox, algo assim:

Sub InsereDia()
Set Intervalo = Application.InputBox("Selecione o Invervalo", "Intervalo", Type:=8)
Intervalo2 = Intervalo.Address
Range(Intervalo2) = "=TODAY()"
End Sub