Automatically arrange in Ascending order?

Andrew Hardscape

Board Regular
Joined
Sep 28, 2003
Messages
136
hello all,

sorry to sponge again!

Can anyone advise on how I can make the list of names automatically go into alphabetical order?

What I been doing is I highlight the list then I click on the SORT ASCENDING button.

But is there a way to make it do it by itself?
Sales Closure Tracking.xls
BCDE
2Sales Tracking
32006
4SALES DOLLARSJOB QUANTITIES
5TOTAL QUOTEDTOTAL JOB QUOTES
6$ 80,398.7611
7
8TOTAL SALESTOTAL SOLD
9$ 34,017.765
10
11TOTAL NOT SOLDTOTAL NOT SOLD
12$ 46,381.006
13
14CLOSURE RATECLOSURE RATE
1542%45%
16
17
18Job NameValueSale (Y/N)
19Aulrich$ 5,189.00N
20Barber, Bryan$ 12,570.00N
21Baughman$ 13,767.00Y
22Baughman (trees)$ 2,938.00N
23Biggs$ 3,329.00Y
24Blain$ 12,771.00N
25Brooks$ 4,864.00N
26Brown$ 8,049.00N
27Brulia$ 14,296.46Y
28Buckles$ 1,930.30Y
29Buckles$ 695.00Y
30
31
32
33
34
35
36
37
38
39
Sheet1
 

Excel Facts

Round to nearest half hour?
Use =MROUND(A2,"0:30") to round to nearest half hour. Use =CEILING(A2,"0:30") to round to next half hour.

Andrew Hardscape

Board Regular
Joined
Sep 28, 2003
Messages
136
I believe I do.

I'm by far no expert, but from what I do know, a Macro is the only way to accomplish this.
 

agihcam

Well-known Member
Joined
Jan 16, 2006
Messages
1,624
right click the sheet in question, view code then paste this code on the large white screen to the right.
Code:
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
Dim i As Long
i = Range("a" & Rows.Count).End(xlUp).Row
If Target.Address <> "$A$18" Then Exit Sub
Range("A19:C" & i).Sort Key1:=Range("A19"), Order1:=xlAscending, Header:=xlNo, _
        OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom
End Sub

close the vbe by hitting x button or hit Alt + Q to return to the sheet.
the range will sort automatically as you double click the Job Name
 

Forum statistics

Threads
1,140,936
Messages
5,703,251
Members
421,289
Latest member
fbohlandt

We've detected that you are using an adblocker.

We have a great community of people providing Excel help here, but the hosting costs are enormous. You can help keep this site running by allowing ads on MrExcel.com.
Allow Ads at MrExcel

Which adblocker are you using?

Disable AdBlock

Follow these easy steps to disable AdBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the icon in the browser’s toolbar.
2)Click on the "Pause on this site" option.
Go back

Disable AdBlock Plus

Follow these easy steps to disable AdBlock Plus

1)Click on the icon in the browser’s toolbar.
2)Click on the toggle to disable it for "mrexcel.com".
Go back

Disable uBlock Origin

Follow these easy steps to disable uBlock Origin

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back

Disable uBlock

Follow these easy steps to disable uBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back
Top