Automatically move row from one tab to another..

[Thraktakh]

He there, I have a question.

I'm working on a salessheet.

The first tab is a summary of al offers I make to the customers.
For every offer I have the option of giving them a status: Pending,
acquired and bounced.
When I send an offer to a customer the order gets the status pending.

What I want to do is the following:
When an order is acquired or bounced I change the status accordingly.
What I want is that as soon as I change the status the entire orderrow
is placed inside a tab named acquired or bounced.

I don't want to copy paste everytime an order is "closed"

Somebody can give me a clue of how to handle this?

Thanks in advance.

 

[Don Guillett]

Try this idea for a macro to be executed when the cursor is anywhere on the
row to be copied. Change the sheet name to yours. You could have two or an
input box asking where to send. There are other ways.

sub copyrowtosheet()
with sheets("destinationsheet")
dlr=.cells(rows.count,"a").end(xlup).row+1
rows(activecell.row).copy .cells(dlr,"a")
end with
end sub

 

[Thraktakh]

Thanks alot,

I will try this as soon as I get home.
If anybody has another suggestion, I'm open to it.

Greetz.