VBA Filter by range

[vicx2ww]

Hi All

I am trying to filter by a range of values , but nothing happens. please help.

PS: howto Debug.Print a range (like workbook ..sheet ... A1:A100)

Debug.Print rngallean.Value
Debug.Print rng1.Value

    Dim template As String
    
    template = ThisWorkbook.Name
    
    
    Dim ltrw As Long
    ltrw = Range("F" & Rows.Count).End(xlUp).Row

        Dim rng1 As Range
        Set rng1 = Range("F6:F" & ltrw)
        
        Dim Ean As String
        
        Workbooks.Open (Range("A1").Value & "EanCode.xlsx")
        Ean = ActiveWorkbook.Name
        
        Dim lastRow As Long
        lastRow = Range("a" & Rows.Count).End(xlUp).Row
        Dim rngallean As Range
        Set rngallean = Range("A1:I" & lastRow)
        
       
        
[U][B]        rngallean.AdvancedFilter Action:=xlFilterInPlace, CriteriaRange:=rng1, Unique:=False[/B][/U]
   
' version 2         
[U][B]    Workbooks(Ean).Sheets("EanCode").Range("A1:I20000").AdvanceFilter Action:=xlFilterInPlace, CriteriaRange:= _
    Workbooks(template).Sheets("Template").Range("F6:F1000"), Unique:=False[/B][/U]

 

[vicx2ww]

up

 

[vicx2ww]

up

 

[vicx2ww]

up

 

[Joe4]

I think you may have more success if you post an example of your data, and your expected results.

 

[vicx2ww]

I have an Excel file were i run a macro. A part of IT consist în opening another file were i have raw data. This raw data i want to filter by The results that i get în The first excel file. I wanted to use ranges. I tried 2 versions. I get no error neither a result.

 

[Joe4]

I am interested in seeing what your data looks like, and what the range you are trying to filter by looks like.
There are different things to consider based on the data you are working with. Being able to see that would go a long way.
I don't like making up data on my own, only to discover that it won't work for you because your data/situation is vastly different.