Can't figure out how to set proper range based on last row/column of data in sort macro

[mick0005]

Hi,

I am using a macro that is derived from an article I found online. It is working right now, but because I don't know how to modify the macro well enough, I defaulted to making the range in the code to be a range which I know we will never extend beyond in our speadsheet.

Basically this just sorts every single column individually in ascending order. It takes a VERY long time to run because it keeps trying to do this for all columns through to AZZ. It would be better if it knew where the last column and row with data was and then only performed the action for that range.

Is that possible?

Here is my current code:

Please Login or Register  to view this content.

[Kaper]

look here how to determine last occupied column and row: http://www.rondebruin.nl/win/s9/win005.htm