Basic structure idea:

Dim MyValue as String

MyValue = Range("a2").value
For each worksheet in 'specificy range
'apply authofilter, search criteria based on MyValue
'Select data you want
Selection.Copy
'Return to home sheet, find first empty row
ActiveSheet.Paste
Next Worksheet

Obviously this isn't a complete program, but hopefully it gives you some
idea as to where to start. A lot of it can be written simply by recording
yourself doing said actions.

--
Best Regards,

Luke M
*Remember to click "yes" if this post helped you!*


"Chey" wrote:

I hope I explain this right.
In a sheet I want a date field that I can type in and a command button that
will pull from 12 spreadsheets Names, OTIS number and Release Date.
I know how to create a command button I am just unsure of the code. Right
now I am working with 3 sheets but will be adding more later.

Thanks
Cheyenne