这对于宏是否足够？

Question

我有一个必须过滤掉终止员工的报告，我有一个按S列过滤的宏，选择所有终止的EE，然后删除这些行。但是，不能保证第一个终止的EE始终位于同一行。例如，本周可能是第22行，下周可能是第16行。我现在在宏的那部分使用的代码是

Application.Goto Reference:="R1C1"
ActiveCell.Offset(1).Select
Range(Selection, Selection.End(xlToRight)).Select
Range(Selection, Selection.End(xlDown)).Select
Selection.EntireRow.Delete

应该转到A1，然后下拉至显示的下一行（第一个终止的EE），然后选择并删除这些行。正如我前面提到的，第一行显示的时间可能在一周之间有所不同。每周应该使用什么代码来准确删除显示的第一行？