Excel Não consigo inserir uma fórmula na célula

[Jeff_Sandes]

Não estou conseguindo inserir uma fórmula na célula, porque dá erro de compilação 

 

 

 

Preciso inserir essa fórmula na célula:

 

[AfonsoMira]

Boas @Jeff_Sandes ,

Experimente da seguinte maneira:

.Range("A1048576") = "=PICurrVal(""\\FTHSERVER\BWF_530BWF_SP_OP"";0;0"""")"

 

[Jeff_Sandes]

11 minutos atrás, AfonsoMira disse:

.Range("A1048576") = "=PICurrVal(""\\FTHSERVER\BWF_530BWF_SP_OP"";0;0"""")"

deu Erro de definição de aplicativo ou de definição de objeto '1004'

 

[AfonsoMira]

E dessa forma:
 

.Range("A1048576").formula = "=PICurrVal(""\\FTHSERVER\BWF_530BWF_SP_OP"",0,0"""")"

 

Continua dando erro?

Após indicar o range coloque ".formula"

[Jeff_Sandes]

sim, continua dando o mesmo erro, será se não tem como converter essa fórmula inteira em String? e jogar a célula? acho que talvez dê certo assim. Mas eu tenho uma certa dificuldade porque estou iniciando no VBA

[AfonsoMira]

Eu errei aqui,

Experimenta agora: 

"=PICurrVal(""\\FTHSERVER\BWF_530BWF_SP_OP"",0,"""")"

 

[Jeff_Sandes]

13 minutos atrás, AfonsoMira disse:

"=PICurrVal(""\\FTHSERVER\BWF_530BWF_SP_OP"",0,"""")"

Nossa deu certo hahaha  eu já tava montando a cadeida de caracteres pelo ASCII hahaha