Copy a row to a worksheet when cell value equals the worksheet name

**jakebrad38** · 06-25-2014, 07:15 PM

Hello,

I have a workbook comprised of about 400 worksheets. I also have a summary page that lists tons of information that I need to automatically be sent to its respected worksheet. On the summary page I have the list of worksheet names in column A starting with cell A3. I am trying to get everything in that row to go to each specific worksheet. Is there a MACRO I can use to do this? Thanks for the help guys!!

Example

Tract date comments

1A 10/21/2013 No Comments
1B 10/21/2013 No Comments
1C 10/21/2013 No Comments
1D 10/21/2013 No Comments

worksheet names summary/ 1A/ 1B/ 1C/ 1D/

**pareshj** · 06-25-2014, 09:18 PM

Hi jakebrad38,

Check the attached macro. Hope this will help you.

Jakebrad38.xlsm

Note: In order to run this macro, you need to have following things in place:
1) Number of columns and the Order of columns should be same in all the worksheets .
2) If there exists multiple rows for one worksheet in Summary worksheet then you need to change the code as this macro was built as per the sample data provided by you.
Example : If you have record for 1A at row 3 and again you have data for 1A at row 10 then you need to change the code slightly.

Regards,
Paresh J