Hi,
Yes that's possible but your code seems an unnecessarily complicated way of transferring a set of data from one sheet to a results sheet.
Use a cell with a drop down data validation list of sheet names, and another with dates, or simply a cell in which you enter a date. Then for your Results output area copy the relevant column labels into columns L4:P4 and name the output range L4:L18 say "MyDataOut"
Then all you need is a simple single line of code that uses an Advanced Data Filter macro with a criteria range that uses the sheet drop down cell as one criteria and the date cell as another.
e.g.
Similarly you can use another criteria with wild cards to pick up anything in column D that has the characters 'juice' in the string.
Advanced Data Filtering is by far the easiest way to achieve the sort of thing you're doing and is literally a single line of code once you've set up your range names for Data, Output and Criteria.
Bookmarks