VBA coding error

[Padawan018]

I am trying to enter a formula via VBA and I am receiving an error when I step through the code at this line:

Range("C1").Formula = "=if(iserror(vlookup(m1,'WBS to MPM Issue Table'!$C$2:$J$148,8,0)),"",VLOOKUP(m1,'WBS to MPM Issue Table'!$C$2:$J$148,8,0))"

I figured out that it Excel is using my 'leave blank' quotes as end of text quotes. Is there any work around for this?

Thanks,

 

[Joe4]

Here's one way:

Range("C1").Formula = "=if(iserror(vlookup(m1,'WBS to MPM Issue Table'!$C$2:$J$148,8,0))," & Chr(34) & Chr(34) & ",VLOOKUP(m1,'WBS to MPM Issue Table'!$C$2:$J$148,8,0))"