You could try this. right click sheet tabview codecopy/paste thissave.
double click on col to sort.

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Excel.Range, Cancel
As Boolean)
[yourrangename].Sort Key1:=Cells(1, ActiveCell.Column), Order1:=xlAscending
End Sub

--
Don Guillett
SalesAid Software

"Mike Lemke" wrote in message
...
In previous versions of Excel, once I had run a sort I noticed that an
arrow
would appear at the top of each column and that by clicking the arrow I
would
be able to sort on that colum.

I purchased Office Professional last year, but this ability to sort does
not
appear when I first run a sort.

Is there some feature I need to turn on to make this happen?