Hi,
Below code filter only for last cell value in range
Sub AutofilterbyRange()
Dim rng As Range
Dim rngfilter As Range
Set rng = Application.Range("f1:f4")
Set rngfilter = Range("a1").CurrentRegion
rngfilter.AutoFilter field:=1, Criteria1:=rng
End Sub
what i need is code should fiter for all cell values in range
Thanks
SAGAR
Hi, SAGAR ,
could you please attach a workbook to clarify your problem? Make sure there is just enough data to make it clear what is needed. Include BEFORE/AFTER sheets if needed to show the process you're trying to complete or automate. Remember to desensitize the data.
Click on GO ADVANCED and use the paperclip icon to open the upload window.
View Pic
And please add Code-Tags around the procedure as requested per Rule#3
Ciao,
Holger
Use Code-Tags for showing your code: [code] Your Code here [/code]
Please mark your question Solved if there has been offered a solution that works fine for you
Hi Holger,
thanks for the time you spend on this thread.
In criteria, Application.Transpose (array or Range("x").value) need to use
Sagar
Please Login or Register to view this content.
Last edited by SAGAR KHOLLAM; 04-01-2013 at 08:14 AM.
Hi, Sagar,
maybe like this:
Ciao,Please Login or Register to view this content.
Holger
There are currently 1 users browsing this thread. (0 members and 1 guests)
Posting Permissions
LinkBack URL
About LinkBacks
Register To Reply
Bookmarks