Macro to apply formula to a range of cell

[Tahitipit]

Hi,


I have written a macro to apply a formula to a range of cell
the following is working just fine

'Worksheets("TRANSPORT").Range("N15:N34").Formula = "=MIN(K15,MAX(D15*I15,J15))*INDEX(ROE,MATCH(G15,DEVISE,0),3)

but this formula is not the complete version that does not work

Here the complete version

worksheets("TRANSPORT").Range("N15:N34").Formula = "=IF(G15="XPF",MIN(K15,MAX(D15*I15,J15),MIN(K15,MAX(D15*I15,J15))*INDEX(ROE,EQUIV(G15,DEVISE;0);3))

The issue seems to be comming from IF(G15="XPF", any idea what is wrong with the syntax ?

 

[JLGWhiz]

The XPF needs two sets of quote marK like ""XPF"" when used in a formula via VBA.