用vba过滤一个或一个条件

我有一系列的数据和名单及其主pipe。 我试图过滤这些数据,以便只包含给定的名称,并且人员监督的人员的名字基本上是他们的名字在雇员栏或监督员栏中。 我已经看过高级filter的选项,但没有看到如何可以解决我的问题。 我使用if语句创build了一个代码,但没有正确过滤。 有没有更简单的方法来做到这一点?

For Each resource In wkbNewBook.Sheets("Availability").Range("A37:A116") rw = resource.Row If Not resource.Value = wkbNewBook.Sheets("Project List").Range("A6").Value Then resource.EntireRow.Hidden = True ElseIf Not wkbNewBook.Sheets("Availability").Cells(rw, "E").Value = wkbNewBook.Sheets("Project List").Range("A6").Value Then resource.EntireRow.Hidden = True Else resource.EntireRow.Hidden = False End If If resource.EntireRow.Hidden = True Then resource.EntireRow.Delete End If Next resource 

所需的名称是在单元格A6不同的工作表上。 员工姓名在列A中,主pipe姓名在列E中。