Compile Error: Expected Expression

[RockandGrohl]

Hi all, getting this expected expression error, it's highlighting the IF part, though I don't know why:

Sub FinalEnqCopydown()
'
' Copydown Macro
'


'


If ActiveCell.Row < 3 Then
MsgBox "Select Last Row in Data"


Else


Application.ScreenUpdating = False
Application.DisplayAlerts = False
Application.EnableEvents = False
Application.Calculation = xlCalculationManual


Do Until Cells(ActiveCell.Row, "A") = ""
Cells(ActiveCell.Row, "V").Formula =IF(Q3="","",IF(IF(COUNTIF(Q4:$Q$195850,Q3)>0,"","Y")="Y",VLOOKUP(Q3,Q:T,4,0),""))
Cells(ActiveCell.Row, "V").Value = Cells(ActiveCell.Row, "V").Value
ActiveCell.Offset(1, 0).Activate


Loop


Application.ScreenUpdating = True
Application.DisplayAlerts = True
Application.EnableEvents = True
Application.Calculation = xlCalculationAutomatic


End If
End Sub


Thanks

 

[Joe4]

You are welcome. Glad we could help.

Long live FF!

 

[RockandGrohl]

Long live FF!

That's my boy