Macro to Move Results From a Filter to a New Worksheet, Delete Original Filtered Results

[censo]

Greetings,

Request assistance in creating a macro that:

1. Filters column AO for the value "EVALUATE"
2. Moves all of those rows to a new workbook that remains open. There is no requirement for name or filetype, so whatever gets created by default is fine
3. Delete all of the original rows that were present in the filter from Workbook 1

The existing code I have performs the delete function successfully but now I need the results to be moved to another workbook instead

Selection.AutoFilter
    With Range("A1:AO" & Range("A" & Rows.Count).End(xlUp).Row)
      .AutoFilter Field:=41, Criteria1:="=EVALUATE"
      .Offset(1).EntireRow.Delete
    End With
ActiveSheet.AutoFilterMode = False

Thanks in advance.