macro to sort in alphabetical order

[mville]

Hi,
I selected Range(A2:C500). Column A represents last names.
I want to sort that range based on alphabetical value from the last names in column A.
How can I do that?
Thanks

 

[Kenneth Hobson]

Data > Sort

 

[mville]

I need to do it throught a macro...not throught data/sort.
How can I do it?

 

[Kenneth Hobson]

I could show you but it is easily seen if you record a macro. If you don't know how, add the Developer tab that has the Record Macro option. See this for details. https://support.office.com/en-us/ar...l-button-d58edd7d-cb04-4964-bead-9c72c843a283

Post back if you are still stuck. You may want to sort the usedrange and not a static range for example. The macro recorder will teach you a lot.

 

[L. Howard]

Here is a pretty simple example to sort with a macro.

Easy to change the range (oneRng) and the sort column (aCol) as needed.
This assumes you have headers for the names, Last, First, Middle... etc. or whatever.
There is no need to select the range of data on the sheet.

Howard

Option Explicit

Sub A_Macro_Sort()

Dim oneRng As Range
Dim aCol As Range

Set oneRng = Range("A1:C500")
Set aCol = Range("A1")

oneRng.Sort Key1:=aCol, Order1:=xlAscending, Header:=xlYes
'oneRng.Sort Key1:=aCol, Order1:=xlDescending, Header:=xlYes

End Sub

 

[mville]

it works...thanks!