Copying the row datas to another sheet if a cell is negative

Hello everyone,

I have a file which I use for the payment collection for my office.
There are totally 7 sheets as of now and it can be increased in future.
The Columns A to H has the details of the customers and some calculations.
The column I is the total column.

Now I have a blank worksheet as "PENDING LIST"

If the column I of sheet 1 is negative (less than 0) then I need to copy the values from A to I to the Pending list.
Like this it should check for all the rows in all the sheets.

Right now am using Filters to solve this but it takes too much of time.
A macro will definitely save me lot of time.

Somebody help me to solve this.

Thanks in advance.

I could not imagine any code could be faster than a filter code, but I can not see any filter code.
You have also merged cells on the pending sheet, like 100 B - 50,000
Are these sheet names?

Hello AB33,

Thanks for the reply.
I have inserted filters and not the code for that.
The cells can be unmerged. That's not a problem.

You do not mentioned if you want to copy the last total row or not.

Last total column can be omitted.

A-I column and last row is omitted

Yes you are absolutely right.

The last "TOTAL" column in each sheet can be omitted. The Range is from A1:I16.

Can be omitted?
I have already told you it did.

Ya it can be omitted. Thats not a problem.

So, the code does as you want it. What is wrong with the code?

Actually now am sorting it out and copying the datas to the pending list. So on click of a button in pending list will this be done.?