Hi All,

I was writing the following code. I copied a chunk of code into the
FilterABAAssays() sub and when I went to compile it, I got the following
error

Compile error:
Only comments may appear after End Sub, End Function, or End Property

I looked everywhere to find anything after my sub ends, but cannot see
anything

Code:

Option Explicit

Sub Main()
Call Getdata
Call Assays.LoadAssays
Call FilterABAAssays
End Sub

Sub Getdata()
fABA.Show
End Sub

Sub FilterABAAssays()
Dim NewBook As Workbook
Selection.AutoFilter
Selection.AutoFilter Field:=2, Criteria1:=ABAPit
Selection.AutoFilter Field:=3, Criteria1:=ABABench
Worksheets("Sheet1").UsedRange.Copy
Set NewBook = Workbooks.Add
NewBook.Worksheets("Sheet1").Range("A1").PasteSpec ial Paste:=xlValues
End Sub