Code:
Private Sub Report_Open(Cancel As Integer)
'changes sort order on report by changing control source for sorting/grouping
Select Case Forms!frmAgedNotices.fraSort
Case 1
With Me.GroupLevel(1)
.ControlSource = "Age"
.SortOrder = True
Leave a comment: