Filtering an Excel file

[GraeagleBill]

In the following Sub, an Excel sheet is filtered to the current value of the current report number, "RptNum". Does anyone know how to modify the filtering statement to filter column 1 to "RptNum" OR column 2 equal to the string "RU"?

Private Sub CreateMembersPDF(RptNum As String)
'*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*
'*  Create PDF file of filtered membership.  The worksheet is first filtered
'*  to the current report number after creating the pdf file name.  Then,
'*  the currently filtered sheet is exported to a pdf file.  Lastly, the
'*  sheet filtering is turned off.
'*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*

strPCMemFile = DLookup("PCFLoc", "tblPCF")
strPCMemFile = strPCMemFile & Year(Date) & "-" & RptNum & "-Members.pdf"        ' Set Global variable for subsequent pdf appendage operation
If Len(Dir(strPCMemFile)) > 0 Then _
    Kill (strPCMemFile)

xlsApp.Worksheets("Membership").Activate
xlsApp.Worksheets("Membership").AutoFilterMode = False
xlsApp.Worksheets("Membership").[a1].AutoFilter 1, RptNum     <<<<<<<<<<<<<<<<<<<<<<<<<<

xlsApp.ActiveSheet.PageSetup.PrintArea = "$A$1:$AA$60"
xlsApp.ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, filename:=strPCMemFile, _
                                Quality:=xlQualityStandard, IncludeDocProperties:=False, _
                                IgnorePrintAreas:=False, OpenAfterPublish:=False
                                
xlsApp.Worksheets("Membership").AutoFilterMode = False

End Sub

[June7]

Might want to post in an Excel forum. As far as can I tell from research, AutoFilter allows only one column. AdvancedFilter allows multiple columns but the filter criteria must be reference to cell range.

[GraeagleBill]

Ah! Just coming into the office to do just as you suggested. As you've already discovered, there is support for multiple columns but no clear way indicated as to how some logic can be applied. If someone in the Excel forum comes up with a usable suggestion I'll certainly post it here.
Bill