根据 Workbook1 中单元格值中的单元格值筛选 Workbook2 中的数据

Question

I need a VBA code that will filter the data in Workbook2 based on the cell value in Workbook1.

For Example: I need to pick up data from the cell under Filtered Data

Split the data if there are multiple values separated by semicolon and apply filter using xlOr operation in Workbook1. The data which needs to be filtered will be dynamic based on the cell value.

Answer 1

The solution you are looking for is a simple Split function.

criterias = Split(ThisWorkbook.Worksheets(1).Cells(2, 1).Value, ";")

It splits the string in sheet 1 cell A2 into an array, it cuts at ";"and will just be an array. In thi case the Array will look like criterias=[A,B,C] When you got that string you can use autofilter.

ThisWorkbook.Worksheets(2).Range("A1").AutoFilter Field:=1, Criteria1:=criterias, Operator:=xlFilterValues

That will filter it so that it shows just all cells which contain A, B or C. You can change Thisworkbook.worksheets(1) to whatever the second workbook is.