No, you need some way to identify the unique case number - type it in a text box, select it from a combo box or list box.
The code behind the button would be something like:
If the unique case number field type is a number
Code:
Dim sWhere as string
sWhere = "CaseNumber = " & tbCaseNum
DoCmd.OpenReport("MyReportName", , , sWhere)
If the unique case number field type is text
Code:
Dim sWhere as string
sWhere = "CaseNumber = '" & tbCaseNum & "'"
DoCmd.OpenReport("MyReportName", , , sWhere)
Note: in this example tbCaseNum is a text box you enter the case number into.
"MyReportName" is the name of your report