Working macro for clean nedd to be changed

[abjac]

HI I have below code which seems to help me. I had some problems when I copy from other place and run macros after. But this code help.
I need to make the code so it can clean all sheet from row3. Its many columns and also can be many rows. Please have a look at the code, how it can be changed so it take all the sheet. And consider speed also.

Thanks in advance

Sincerely
Abjac

Please Login or Register  to view this content.

[nathansav]

set rng = .usedrange

[JOHN H. DAVIS]

Add a row offset to Post# 2.

Set rng = .UsedRange.offset(3)

[nathansav]

Yes, but only if there is something in rows 1 to 2

[abjac]

Hi Nathansav.

Thanks for you answer.

It don't work if put it just like that and if put in the end of the string also not.
I know this one have to be changed but how if I want to able to select start row example.

Please Login or Register  to view this content.

Abjac

[JOHN H. DAVIS]

Yes, but only if there is something in rows 1 to 2

I need to make the code so it can clean all sheet from row3.

[abjac]

I tried to replace this in the code.

Please Login or Register  to view this content.

with this

Please Login or Register  to view this content.

It give an error unqualified or invalid error,

I have header in row 1 and other sheet also 2 , that's why I need this to be able to change

Abjac

[nathansav]

Is it in the with block?

[JOHN H. DAVIS]

Did you take it out of the With Statement? That's the only way I can duplicate the error.

[abjac]

HI Sorry just came home. I put below code in and now it don't give the error but its extreme slowly. I have attached a test sheet with data. Please try it there. Its like it continue after and stop long time after.

Please look at the test sheet
Abjac
Here is my code.

Please Login or Register  to view this content.

[nathansav]

Turn your calculation off, application.calculation=xlCalculationManual

[abjac]

HI Tried that that make it even worse put the word FALSE in all cells. So it don't work. Please try the test sheet.

Thanks

Abjac

[nilem]

maybe

Please Login or Register  to view this content.

[AB33]

Try the attached.

[abjac]

HI Sorry the code was working when I put it on manual. But still little slow but working thanks allot nathansav.

Hi Nilem. Your code is really good and very fast. And Hi Ab33 yours are nearly the same and also very very fast.

Thanks both of you. I will choose them, they speed it up very much.

And thanks to you too Nathensav. Even a little slower it worked good.

So thanks all for the great help.

Sincerely

Abjac