Hi guys
I am getting run-time-error '13' Type mismatch when I run the below code, can you help to identify what is wrong in my code?
I am getting run-time-error '13' Type mismatch when I run the below code, can you help to identify what is wrong in my code?
VBA Code:
Sub FILTERData()
Dim rngData As Range, rngCriteria As Range, rngOutput As Range
Set rngData = Sheets("RawData").ListObjects("tblTrRawData")
Set rngCriteria = Sheets("Groups").Range("I29:L30")
Set rngOutput = Sheets("Groups").ListObjects("tblGrNames")
rngData.AdvancedFilter xlFilterCopy, rngCriteria, rngOutput
End Sub