Trying to run through a loop and use a formula to determine if the cell has required values. This syntax does not work and bombs at the IF THEN statement. Suggestions please.
For Row = 2 To NrRows
If Left(Range(Cells(Row, 1), Cells(Row, 1)), 1) = "9" Then
Range(Cells(Row, NrCols + 1), Cells(Row, NrCols + 1)).Value = "1"
' Do nothing