Sub Advanced_Filter()
Dim Ws1 As Worksheet
Dim Ws2 As Worksheet
Dim dataSet As Long
Dim setCriteria As Long
Set Ws1 = Workbooks("Template Report.xlsx").Sheets(1)
Set Ws2 = Workbooks("Template Report.xlsx").Sheets(2)
dataSet = Ws1.Range("A" & Ws1.Rows.Count).End(xlUp).Row
setCriteria =...