Syntax Error

[clynch28]

I am trying to write code to insert this formula into a cell but it is coming up with an error box saying that it is expecting an ending. Can anyone help?

Cells(1, 8).Value = "Letter Grade"
Cells(2, 8).Activate
ActiveCell.Formula = "=IF($G2>=90,"A",IF(90>$G2>=80,"B",IF(80>$G2>=70,"C",IF(70>$G2>=60,"D","F"))))"

 

[Scott Huish]

There's no need to select the cell first, but your problem is that VBA uses quotes to indicate the start and end of strings, so to include them, you need to enclose the quotes in quotes like this:

Cells(2, 8).Formula = "=IF($G2>=90,""A"",IF(90>$G2>=80,""B"",IF(80>$G2>=70,""C"",IF(70>$G2>=60,""D"",""F""))))"