Did you change ONLY the two lines of code I gave you and exactly as I typed
it? Your code should be:
Select Case tgl.Value
Case True
Me.OrderBy = str & " DESC"
Me.OrderByOn = True
Case False
Me.OrderBy = str
Me.OrderByOn = True
End Select
When the button is "down", it should sort descending. Click the button up,
and it should sort ascending. Note that Me.OrderByOn should be TRUE in both
cases.
John Viescas, author
Building Microsoft Access Applications
Microsoft Office Access 2003 Inside Out
Running Microsoft Access 2000
SQL Queries for Mere Mortals
http://www.viescas.com/
(Paris, France)
For the inside scoop on Access 2007, see:
http://blogs.msdn.com/access/
-----Original Message-----
From: [email protected] [mailto:[EMAIL PROTECTED] On Behalf
Of bbasile2001
Sent: Saturday, May 13, 2006 4:40 AM
To: [email protected]
Subject: [ms_access] Re: Command button to sort records on a form
John,
Thanks for catching that. Yes, I did have it that way - deleting
the DESC from the True, but it didn't work that way either (it was a
mistake in the code when I sent it).
Ok, well if the str & " DESC" part looks ok to you, then this should
work. I'm able to get this to work "ascending" (with the change you
made) but not descending.
I'm surprised that there's not a simpler way to do it, but maybe
that's the best code.
I'll keep playing with it.
... unless there's another way to use the toggle to sort up and down?
Thanks again for your help.
I've been reading this list for a long time and I always enjoy your
responses.
Bill
--- In [email protected], "John Viescas" <[EMAIL PROTECTED]> wrote:
>
> Bill-
>
> Just change Case False to:
>
> Me.OrderBy = str
> Me.OrdderByOn = True
>
> John Viescas, author
> Building Microsoft Access Applications
> Microsoft Office Access 2003 Inside Out
> Running Microsoft Access 2000
> SQL Queries for Mere Mortals
> http://www.viescas.com/
> (Paris, France)
> For the inside scoop on Access 2007, see:
> http://blogs.msdn.com/access/
>
>
> -----Original Message-----
> From: [email protected] [mailto:[EMAIL PROTECTED]
On Behalf
> Of Bill Basile
> Sent: Friday, May 12, 2006 2:15 AM
> To: [email protected]
> Subject: [ms_access] Command button to sort records on a form
>
> Could someone help with this?
>
> It should be really simple -- but I've looked everywhere and I
couldn't
> find it.
> Basically, I'm just looking for a button that can toggle between
sort
> ascending and sort descending on a form. It can be done with a
right-click
> menu item, so I figured it would be simple code.
>
> I found this in an Access 97 book, but it only works on the
ascending.
>
> Dim str As String, tgl As ToggleButton
> str = "Forms!frmViewAll!lblDESCRIPTION"
> Set tgl = TglDescription
> Select Case tgl.Value
>
> Case True
> Me.OrderBy = str & " DESC"
> Me.OrderByOn = True
>
> Case False
> Me.OrderBy = str & " DESC"
> Me.OrderByOn = False
>
> End Select
> End Sub
>
> ===============
>
> I think the problem is with the line Me.OrderBy = str $ " DESC"
>
> The code now will go from unsorted to sort ascending, but it won't
toggle
> to the sort descending.
> Thanks in advance for your help.
>
> Bill
>
>
>
>
>
> Yahoo! Groups Links
>
Yahoo! Groups Links
SPONSORED LINKS
| Microsoft access database | Database development software | Database management software |
| Database software | Inventory database software | Membership database software |
YAHOO! GROUPS LINKS
- Visit your group "ms_access" on the web.
- To unsubscribe from this group, send an email to:
[EMAIL PROTECTED]
- Your use of Yahoo! Groups is subject to the Yahoo! Terms of Service.
