Excel Trabalhando com fórmula dinâmica

[Jeff_Sandes]

Estou tantando inserir uma fórmula na célula através do VBA. A fórmula possui parâmetros de tempo, que é um número acompanhado de uma unidade de medida "-1h", "-1d","-1m".... Assim puxa o valor de uma hora atrás --> Range("A1") = "=PIArcVal(""\\FTHSERVER\MODBUS.QDMT_VE10.POTENCIA"",""-1h"",0,"""",""auto"")". Até aqui tudo ok! O problema vem quando começo a querer mexer com o valor dessa "-1h".

estou fazendo assim 

 

Sub teste()
Dim HORA As Integer
HORA = 1
Range("A1") = "=PIArcVal(""\\FTHSERVER\BWF_530BWF01.TT""," & -HORA & "h"",0,"""",""auto"")"
End Sub

 

porém está dando erro definição. Preciso sabe como faço para manipular esse valor dentro da fórmula para que eu possar puxar os valores que qualquer hora.

 

 

[Edson Luiz Branco]

31 minutos atrás, Jeff_Sandes disse:

...porém está dando erro definição.

 

Parece que está faltando um par de aspas duplas logo antes do primeiro E comercial:

 

Range("A1").Formula = "=PIArcVal(""\\FTHSERVER\BWF_530BWF01.TT"",""" & -HORA & "h"",0,"""",""auto"")"

 

[Jeff_Sandes]

@Edson Luiz Branco Deu certo!  Muito Obrigado