"Tom Ogilvy" wrote:

With your sample date run this:
Sub Macro7()
Columns("B:B").Select
[..]
Range("A4").Select
End Sub
Use this concept to fix you problem (cut the columns you don't want sorted,
sort the data, cut the columns not sorted back to their original locations )

I somewhat hoped there would be an easier way to make the Excel sort
function behave the way I want, but your technique works fine too. "Dick
Kusleika" posted another method I'll take a closer look at. It seems to
me the best solution at this point.

Thanks Tom, Dick and gocush for your input!

--
mahi