Excel Inserir fórmula na célula com Range

[Jeff_Sandes]

Já tentei de diversas formas mas não estou conseguindo inserir uma fórmula na célula

essa é a fórmula original na célula

=((@PIArcVal("\\FTHSERVER\ACS_540SE01M1.V";"28/08/2022 0:00:00";0;"";"auto")/0,8333)*0,05617978)

essa é a fórmula que estou tentando inserir no VBA

"=""(""(""PIArcVal(""\\FTHSERVER\ACS_540SE01M1.V"",""" & Data & " " & horas & ":00:00"",0,"""",""auto"")""/""0,8333"")""*""0,0567978"")"

 

[AfonsoMira]

Boas @Jeff_Sandes ,
Experimente assim:
 

"=((@PIArcVal('\\FTHSERVER\ACS_540SE01M1.V';'28/08/2022 0:00:00';0;'';'auto')/0,8333)*0,05617978)"

 

Ps. Não testei

[Jeff_Sandes]

@AfonsoMira Não funcionou, porque a fórmula deve ser inserida toda em Caracteres,

Exp: 

=@PIArcVal("\\FTHSERVER\ANA_540CH02.PV";"01/09/2022 00:00:00";0;"";"auto") essa é a fórmula na célula

"=PIArcVal(""\\FTHSERVER\ANA_540CH02.PV"",""01/09/2022 00:00:00"",0,"""",""auto"")" esse é o formato no VBA

 

Essa é a fórmula que estou tentando inserir atrás de um comando Range do VBA, porém não estou conseguindo colocar as aspas na posição correta.

=((@PIArcVal("\\FTHSERVER\ACS_540SE01M1.V";"28/08/2022 0:00:00";0;"";"auto")/0,8333)*0,05617978)

 

Já tentei de diversas formas separar os caracteres, mas nenhum deu certo.

[Midori]

Tenta desta forma,

 

"=((@PIArcVal(""\\FTHSERVER\ACS_540SE01M1.V"",""" & Data & " " & Horas & """,0,"""",""auto"")/0.8333)*0.05617978)"

 

[Jeff_Sandes]

16 minutos atrás, Midori disse:

"=((@PIArcVal(""\\FTHSERVER\ACS_540SE01M1.V"",""" & Data & " " & Horas & """,0,"""",""auto"")/0.8333)*0.05617978)"

Deu certo!!!