Pick List
 

I wish to have a form that would display contents populated from an array as
follows:

Header: Description, Item#
Data: Pork Chop, 111111
Data: Frog Legs,222222
etc...
and the user could sort the data on either the Description or the Item #,
based on which "column" he is in. Does anyone know of any way to do
something like this?

Pick List
 

Sub SortData()
Columns("A:C").Sort key1:=Cells(1, ActiveCell.Column), _
order1:=xlAscending, _
header:=xlYes
End Sub


--
---
HTH

Bob

(there's no email, no snail mail, but somewhere should be gmail in my addy)



"Mike H." wrote in message
...
I wish to have a form that would display contents populated from an array
as
follows:

Header: Description, Item#
Data: Pork Chop, 111111
Data: Frog Legs,222222
etc...
and the user could sort the data on either the Description or the Item #,
based on which "column" he is in. Does anyone know of any way to do
something like this?