[AccessD] Set Report Format

Charlotte:

Sorry to not be getting this - it's new ground for me.

I changed the call to Call TranslateControlReport(Me) but in the function
the passed argument is a string:

Public Function TranslateControlReport(argReport As String)

which generates a type mismatch.  So I probably need a different type in the
AS clause?  I tried changing it to Variant but no soap.


TIA

is


----- Original Message ----- 
From: "Charlotte Foust" <cfoust at infostatsystems.com>
To: "Access Developers discussion and problem solving"
<accessd at databaseadvisors.com>
Sent: Thursday, June 03, 2004 9:06 AM
Subject: RE: [AccessD] Set Report Format


> Change the argument to an object, not a report or string.  Pass in the
> subreport or report like this:
>
> Call TranslateControlReport(Me)
>
> Then all the function has to do is test to see if the object is a report
> or subreport and then loop through its controls collection changing
> labels.  Since it doesn't have to instantiate anything in the function,
> it doesn't need the name.
>
> Charlotte Foust
>
> -----Original Message-----
> From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com]
> Sent: Thursday, June 03, 2004 7:56 AM
> To: Access Developers discussion and problem solving
> Subject: Re: [AccessD] Set Report Format
>
>
> Charlotte:
>
> In the subreport's Report_Open event I call the routine like this:
>
> Call TranslateControlReport(Me.Name)
>
> But that isn't working.  Is there another way?
>
> TIA
>
> Rocky Smolin
> Beach Access Software
> http://www.e-z-mrp.com
>
>
> ----- Original Message ----- 
> From: "Charlotte Foust" <cfoust at infostatsystems.com>
> To: "Access Developers discussion and problem solving"
> <accessd at databaseadvisors.com>
> Sent: Thursday, June 03, 2004 8:41 AM
> Subject: RE: [AccessD] Set Report Format
>
>
> > Rocky,
> >
> > The subreport isn't open in the same sense the parent report is, so
> > your routine is going to bomb because the subreport won't show up in
> > the reports collection.  I usually pass an object instead of a string
> > in situations like this, which avoids the problem because the object
> > already exists and doesn't have to be instantiated properly.  You can
> > pass Me from the subreport into the function and have it work without
> > problems.
> >
> > Charlotte Foust
> >
> > -----Original Message-----
> > From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com]
> > Sent: Thursday, June 03, 2004 7:34 AM
> > To: AccessD at databaseadvisors.com
> > Subject: [AccessD] Set Report Format
> >
> >
> > Dear List:
> >
> > I am trying to set a variable rpt to a sub report in a Public function
>
> > (this is for purposes of translating the labels to a foreign
> > language). I am passing the report name to the function in the
> > Report_Open event.
> >
> > Setting it to the Main report is no problem.
> >
> > Public Function TranslateControlReport(argReport As String) As Boolean
> >
> > Dim rpt As Report
> >
> > Set rpt = Reports(argReport)
> >
> > works fine.
> >
> > But in the _Open event of the sub-report when I pass the name of the
> > sub-report to this routine I get a run time error 2451 - the report
> > name you entered is misspelled or refers to a report that isn't open
> > or doesn't exist.
> >
> > I think it has to do with the fact that I'm only passing the
> > sub-report name and have to qualify it with the Main report?  But I've
>
> > tried several syntaxes with no luck.
> >
> > Anybody know?
> >
> > MTIA
> >
> > Rocky Smolin
> > Beach Access Software
> > http://www.e-z-mrp.com
> >
> >
> > But
> > --
> > _______________________________________________
> > AccessD mailing list
> > AccessD at databaseadvisors.com
> > http://databaseadvisors.com/mailman/listinfo/accessd
> > Website: http://www.databaseadvisors.com
> > -- 
> > _______________________________________________
> > AccessD mailing list
> > AccessD at databaseadvisors.com
> > http://databaseadvisors.com/mailman/listinfo/accessd
> > Website: http://www.databaseadvisors.com
>
> -- 
> _______________________________________________
> AccessD mailing list
> AccessD at databaseadvisors.com
> http://databaseadvisors.com/mailman/listinfo/accessd
> Website: http://www.databaseadvisors.com
> -- 
> _______________________________________________
> AccessD mailing list
> AccessD at databaseadvisors.com
> http://databaseadvisors.com/mailman/listinfo/accessd
> Website: http://www.databaseadvisors.com