Hi All and a Merry Christmas
I am using the following code to run a report. Is there anyway that this code could prompt for a report selection rather than just one report

    Dim stDocName As String

    stDocName = "FrmReports"



    If Len(Me.txtdatefrom & vbNullString) = 0 Or Len(Me.txtDateTo & vbNullString) = 0 Then
        MsgBox "Please ensure that a report date range is entered into the form", _
               vbInformation, "Required Data..."
        Exit Sub
    Else
        DoCmd.OpenReport stDocName, acPreview
Thanks


Brendan Bartley

__________________
Brendan Bartley

Hi Brendan,
You can build a dialog form where the user chooses which report they want to open. (Such as using radio buttons).
Example:
1. OPtion 1 could be "View Client Report" (if selected the rptClient (Client Report) opens) Option 2: "View Inventory Report" (which opens (rptInventory)the Inventory Report.)
2. Use a Select Case statement to determine which the user has chosen and determine which report to open.
    (ie:
          Dim stDocName As String
          Select Case fraReports
                case 1 '(option 1) user wants Client Report (rptClient)
                       stDocName = "rptClient"
                case 2 'option 2 user wants Inventory Report (rptInventory)
                       stDocName = "rptInventory"
                'other cases
           End SElect

     DoCmd.OpenReport stDocName, acPreview

BTW- Why are you prompting the user for the date range for the report? Are you using that info for filtering? (Is its use just not included in this snippet?

HTH,

Loralee