Multiple Group Header Sorting via VBA

[rsarracini]

I have a report with3 Group Headers. I would like to let the user choose if they want to seethe three headers or drop it down to just the two. One of the three alwaysneeds to be there, but depending on whether the other two are selected, it can bethe first or the last Group header.
Many posts mentionhiding a group header, which I do. The problem with hiding is that thesort hierarchy still applies resulting in a sort result that isn't obvious whenviewing the report (as the hidden group heading still has sorting control).
The order of thegroup headings can be manually changed in the "Group, Sort and Total' panein the report design. I'm really looking for how to do the same thing inVBA (eg use the 'move up' and 'move down' buttons). By hiding the group headingI don't want and moving it to bottom, the sort occurs as required.

[June7]

This can probably be done programmatically but I think even the code would have to open the report in design view, edit report settings, then save the report then reopen again in Report or Preview or Print. I had to resort to that process for a couple of reports, but not to change grouping, other issues were involved.

[ranman256]

Reports is not the place to do custom programming.
Queries maybe, but reports are just for looking....
just make a report for each different sort, let user pick.

[rsarracini]

Thanks, I'm actually making other changes to the report programmatically, so opening the report in design view is fine (the user makes selections prior to 'running the report'. The code then opens the report in design view and makes changes before opening it in report view). What I'd like to understand is what is the VBA coding to effect the change in Group Header sorting as per my original description.

[June7]

Afraid I don't know. That would be a learning experience for me as well.

Bing: Access VBA report group

Maybe this will help http://bytes.com/topic/access/answer...ader-using-vba

I might be wrong about having to open in design view.