View Single Post
  #1  
Old May 1st, 2010, 05:44 PM posted to microsoft.public.access.forms
AccessKay
external usenet poster
 
Posts: 106
Default Allen Browne’s date range vba for more reports

I created an unbound form and used Allen Browne’s vba for “Limiting Report to
Date Range”. This works nicely. But I want to use this vba to pull two
other reports. I could make three command buttons and put the report label
name beside them but I don’t think I’ll like how this looks. I created an
option group for my reports that previews the reports on click but it’s not
connected to the date range. So my question is, how can I have an option
group of reports for my date range? I thought I might take a stab at doing
it myself, and post again later with either my success or failure. But I’m
new with vba and have a few questions to get me started.

1.Is it advisable to combine the vba for the date range and the vba for the
option group? They both have on click commands so I’m thinking that one has
to go. So my assumption for the rest of these questions is yes, that I do
need to combine them, but please correct me if I’m wrong.

2.Allen Brown’s vba defines the report first with Dim strReport As String
and then later with strReport = “MyRpt1”. If I want to add two more reports,
do they need to be defined in these same sections? Maybe like Dim strReport2
As String and strReport2=”MyRpt2”??? Is this what I need to do?

3.Then in Allen’s vba, it’s If statements with a strWhere. The code for the
option group is Select Case Me.optReports and then each case ie Case1
strReport = “MyRpt1”, etc. Should this be incorporated into a strWhere
statement? From what I’ve learned so far, I think so but I’m really stumped
about how to do this. Any suggestions?

4.And then comes the DoCmd.OpenReport strReport, acPreview part. I’m
thinking that if I wrote my strWhere statement correctly, then this will work
for whatever option I choose. Correct?

5.And then there is the Error Handler part that I don’t have a clue so maybe
I’ll skip this part for now.

If you’ve read my post this far, then I sincerely thank you. If you think
that I need to give it up then please tell me so. I know I’m in way over my
head. I’ll take any suggestions and give it a try or not.

Many thanks for any replies.
Kay