Help Required on Report List

[cap.zadi]

Dear



Please find the attachment which have all details about the error while opening the Report from a report list.

thanks

zee

[boblarson]

The row source for the combo box needs to include the regular name field as well and not just the one that is stripped of the sjs_. You need to have that field as the bound column of the combo box and you can set it to be hidden though. The Row Source of the combo should just be:

SELECT MsysObjects.Name, Mid([Name],5) AS QueryName
FROM MsysObjects
WHERE (((Left([Name],4))="sjs_"))

ORDER BY MsysObjects.Name;

And then Column Count set to 2
Bound Colum set to 1
And ColumnWidths 0";2"

[cap.zadi]

Sir, its working now. so nice of u. bye

[cap.zadi]

Sorry to write u back. The list which appears in Combobox it is the list which contains sjs_ but there shud be the queryname field?

[boblarson]

Sorry to write u back. The list which appears in Combobox it is the list which contains sjs_ but there shud be the queryname field?

Not sure I'm understanding your question. Can you upload a couple of screenshots to this forum showing what you are asking about?

[cap.zadi]

sir, please find the attached file.

[boblarson]

Change these properties of the combo box:
ColumnCount = 2
ColumnWidths = 0";3"

[cap.zadi]

fine sir, i try now.

[cap.zadi]

yes sir, it is working. thanks. sir one more question please. if there i have Pivot Charts which are made on forms ? so how to display them through same command. it appears in list but could not be open with this command bcz it is only for reports. so please advise?

[boblarson]

You would have to name them something like frm_

and then change the code in the combo's After Update event to run DoCmd.OpenForm instead of DoCmd.OpenReport if the first 4 characters are frm_

So something like this:

 
Select Case Left(Me.ComboBoxNameHere, 4)
Case "rpt_"
   DoCmd.OpenReport Me.ComboBoxNameHere, acViewPreview
Case "frm_"
   DoCmd.OpenForm Me.ComboBoxNameHere
End Select