Help in Sorting Unknown Cell Range Alphabetically

[crisshinn]

Hello All, I am having problems on how to sort data alphabetically by means of excel code that will just let the user press the button and sort the data automatically.

I need to sort the data Alphabetically by Last Name. Problem is, I can only sort the whole column of the Last Name itself. I can't sort the adjacent columns with the Last Name column. Thats why whenever I sort it, only the last Name column moves, the others don't.

Also, the number of people in the excel worksheet may also vary. Therefore I need to adjust my program based on the number of people listed in the Excel Sheet.

I could record the macro, but that doesn't solve my range problem.

How can I adjust the Range and sort them alphabetically? Here is the attached excel workbook for my project.

Any help is greatly appreciated. Thank you ;D

[pike]

Hi crisshinn,
Why dont you just use the Data > Filter?

[crisshinn]

Hi crisshinn,
Why dont you just use the Data > Filter?

What do you mean Data > Filter? Why would I Filter the selection? xD I do know of the Data > Sort.

Sorry I really need to code this in Macro Excel.

[pike]

A recorded macro results

Please Login or Register  to view this content.

[pike]

and with code cleaned-up

Please Login or Register  to view this content.

[crisshinn]

Hi, sorry for the double post, That code works assuming that I know the whole range of my list.

But the list can increase depending on the number of people added in the file.

[pike]

Hi crisshinn

"Worksheets("Sheet1").Cells(Rows.Count, 3).End(xlUp).Row" will find the last row in dynamic list

Please Login or Register  to view this content.

[pike]

or

Please Login or Register  to view this content.