Private Sub cbStart_Click()

Workbooks.Open (tbFile)
Sheets(1).Activate

Dim x As Integer
Dim z As Integer




For x = 2 To 10

Application.Goto Reference:="R" & x & "C13"
ActiveCell.FormulaR1C1 = "=(LEFT(RC[-8],LEN(RC[-8])-4)+1)"
ActiveCell.Value = z




If z 10 Then
ActiveCell.Value = "Y"

Else
ActiveCell.Value = "N"

End If


Next x

ActiveWorkbook.SaveAs (tbFile)


End Sub



If not use the if statement , Z value will show, but if i use IF statement
,i cant use the Z value to compare with integer ,anything wrong ?