[AccessD] Set Report Format

Rocky, 

You have to change the function argument.  Like this:

Public Function TranslateControlReport(argReport As Object)


Charlotte Foust

-----Original Message-----
From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] 
Sent: Thursday, June 03, 2004 8:34 AM
To: Access Developers discussion and problem solving
Subject: Re: [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

-- 
_______________________________________________
AccessD mailing list
AccessD at databaseadvisors.com
http://databaseadvisors.com/mailman/listinfo/accessd
Website: http://www.databaseadvisors.com