Sort Ascending or Descending using Option Button
 

I have a user-form with 3 option buuttons, depending on which option is
clicked the event runs and the data is sorted by the relevant column. How do
I add in an extra couple of options that will toggle between sorting the
data select option either ascending or descending.

thanks

Gaz

Sort Ascending or Descending using Option Button
 

I assume you are up to date on adding option buttons to the form and are
looking for code modifications to use the choice. with two option buttons
OptionButton_Ascending
Optionbutton_Descending


Dim ord as Long

ord = 0 ' no choice made
if optionbutton_Descending then
ord = xlDescending '2
elseif optionbutton_Ascending then
ord = xlAscending '1
end if

if ord = 0
' use current setting
selection.Sort Key1:=whatever
else
' use selected order
selection.Sort Key1:=whatever, order1:=ord
end if



--
regards,
Tom Ogilvy

"Gazza" <mallin"nospam" wrote:

I have a user-form with 3 option buuttons, depending on which option is
clicked the event runs and the data is sorted by the relevant column. How do
I add in an extra couple of options that will toggle between sorting the
data select option either ascending or descending.

thanks

Gaz

Sort Ascending or Descending using Option Button
 

You may want to consider using a single checkbox with a "Sort Ascending" label.

Then you could just look at that one checkbox's value.

Gazza wrote:

I have a user-form with 3 option buuttons, depending on which option is
clicked the event runs and the data is sorted by the relevant column. How do
I add in an extra couple of options that will toggle between sorting the
data select option either ascending or descending.

thanks

Gaz

--

Dave Peterson

Sort Ascending or Descending using Option Button
 

My original thought as well, but the sort dialog uses two option buttons -
so for interface consistency.

--
Regards,
Tom Ogilvy

"Dave Peterson" wrote in message
...
You may want to consider using a single checkbox with a "Sort Ascending"
label.

Then you could just look at that one checkbox's value.

Gazza wrote:

I have a user-form with 3 option buuttons, depending on which option is
clicked the event runs and the data is sorted by the relevant column. How
do
I add in an extra couple of options that will toggle between sorting the
data select option either ascending or descending.

thanks

Gaz

--

Dave Peterson

Sort Ascending or Descending using Option Button
 

Not sure how to action this...

I used the click event on each of the original options to run a macro to
sort the data table. I have now grouped the original 3 options into a single
frame - how would I proceed to get the data sorted firstly based on the sort
option click and then by the direction of sort from the other 2 options
located on a second frame and would all this code need to be written on a
general module?

Thanks

Gaz

"Tom Ogilvy" wrote in message
...
I assume you are up to date on adding option buttons to the form and are
looking for code modifications to use the choice. with two option
buttons
OptionButton_Ascending
Optionbutton_Descending


Dim ord as Long

ord = 0 ' no choice made
if optionbutton_Descending then
ord = xlDescending '2
elseif optionbutton_Ascending then
ord = xlAscending '1
end if

if ord = 0
' use current setting
selection.Sort Key1:=whatever
else
' use selected order
selection.Sort Key1:=whatever, order1:=ord
end if



--
regards,
Tom Ogilvy

"Gazza" <mallin"nospam" wrote:

I have a user-form with 3 option buuttons, depending on which option is
clicked the event runs and the data is sorted by the relevant column. How
do
I add in an extra couple of options that will toggle between sorting the
data select option either ascending or descending.

thanks

Gaz