Urgent help I want my VB script to insert an excell formula in a specified excel cell

[nicoPK]

The formula is: =IF(Input!R703<0,HPLNK(Input!R703,Entity,Category6 ,$A$677&"."&$A703,N$3,Frequency1,Application1),HPL NK(Input!R703,Entity,Category6,"P1709"&"."&$A703,N $3,Frequency1,Application1))
This works fine is excel so I know the syntax is ok with Excel

When I try this in VB:
Range("N679").Select
Selection.Formula = "=IF(Input!R679<0,HPLNK(Input!R679,Entity,Category 6,$A$677&"."&$A679,N$3,Frequency1,Application1),HP LNK(Input!R679,Entity,Category6,"P1709"&"."&$A679, N$3,Frequency1,Application1))"

I get a compile error with syntax

Can anyone help?

[code green]

Try writing the formula to the cell as a string.

Range("N679") = "IF(Input!R703<0,HPLNK(Input!R703,Entity,Category6 ,$A$677&"."&$A703,N$3,Frequency1,Application1),HPL NK(Input!R703,Entity,Category6,"P1709"&"."&$A703,N $3,Frequency1,Application1))"

The code I've posted won't work without modification.
But I have written formulas as strings to Excel with no problems.

[Rabbit]

You didn't escape the double quotes in your string.
Error> "a & "b" & c"
Correct> "a & ""b"" & c"

[nicoPK]

spot on Rabbit - thanks for your help