VBA Auto copy rows to multiple sheets by criteria

[Freshlight]

Hello,
I'm new to programming with VBA, but i have a serious problem, and I thought You guys could help me.
Here's the thing - I have MS excel document with 8 sheets in it. The first one is named "Orders", the second one "Direction1", the third, "Direction2", the fourth "Direction3", then "Direction4", "Direction5", "Direction6", "Direction7".
In the "Orders" sheet C column has numbers based on the direction from 1 to 7. What I would like excel to do, is to find the number in C column (1 to 7) and copy that entire row accordingly to direction.
For example:
if number in column C is 6, excel should copy entire row to Direction 6.

Few things to mention - information in "Orders" sheet is always changing.
And second thing orders in sheets shouldn't left any empty rows between each other.

I would be very grateful for Your help, because now I'm doing this copy/paste with my mouse :\

[apo]

Did you want to copy the entire row to the direction sheet (leaving the row still in the Orders sheet).. or.. move the entire row to the direction sheet (so it no longer exists in the Order sheet)..?

[Freshlight]

I wanted to copy entire row to direction sheet.

[apo]

Hi..

This will do it..

If you have any problems adapting it to your real workbook.. let me know..

Please Login or Register  to view this content.

[Freshlight]

Thank You very much!!!
First thing - excel MOVES information to according sheets, I need it to copy the information.
Second thing, my real work book direction sheets have different names. what should I do to adapt it to my real workbook?

[apo]

Hi..

First thing - excel MOVES information to according sheets, I need it to copy the information.

Initially i made it copy the data.. then remember the range of the data that was copied then cleared it at the end..

I have changed it so it doesn't clear it now.. but are you sure that's what you want?.. What happens if you run the macro twice.. it will copy the same data to the other sheets.??
Anyway..
This should do it..

Please Login or Register  to view this content.

Second thing, my real work book direction sheets have different names. what should I do to adapt it to my real workbook?

Only thing there was to make the autofilter criteria be set by the 'i' variable.

[Freshlight]

Yes, I'm sure i need it to copy. And one last thing - where goes all the orders with direction "1"? They should go to first direction sheet, but in that sheet there are orders with direction "2".

[event21]

Hi -

Change this line from apo's codes
from

Please Login or Register  to view this content.

to

Please Login or Register  to view this content.

event

[Freshlight]

Works like a charm! Thank You! You just made my life much easier.

[apo]

Good catch event21.. i rushed that one..

[event21]

no problem, apo

event