Setting up a form to Sort a report

[Gary Hull]

Hello

I need to set up a form that will sort a report in different ways

Maybe use command buttons for each sort.

I am open and any Ideas

Thanks

Gary

 

[Keith Wilby]

Hello

I need to set up a form that will sort a report in different ways

Maybe use command buttons for each sort.

I am open and any Ideas

I would suggest setting up a reports dialog form which, when you press the
"preview" command button, stays open but hides itself so that you can use
the names of its controls within the report's code to determine what
field(s) to sort on and in what order. You could use combo boxes for field
name selection and an option group to select sort order.

Unhide the form in the report's close event.

Regards,
Keith.
www.keithwilby.com

 

[Gary Hull]

How do I pass the variable to the report?

 

[Keith Wilby]

How do I pass the variable to the report?

You don't need to pass anything. Refer to the form's control names in the
report's open event, for example (untested):

Dim strSQL as String, strSortOrder As String, strFieldName1 as String,
strFieldValue1 as String

If [Forms]![frmMyDialog]![ogrSortOrder] = 1 then strSortOrder = "Asc"
If [Forms]![frmMyDialog]![ogrSortOrder] = 2 then strSortOrder = "Desc"

strFieldName1 = [Forms]![frmMyDialog]![cboField1]
strFieldValue1 = [Forms]![frmMyDialog]![cboValue1]

strSQL = "Select * from qryMyQuery where " & strFieldName1 & " = " &
strFieldValue1
strSQL = strSQL & " Order by " & strFieldName1 & " " & strSortOrder

Me.RecordSource = strSQL

This code isn't the B-all and end-all but it should give you a starter for
ten.

Regards,
Keith.