Need some help please! :) (1 Viewer)

[Sweeto]

I am trying to create a report that only prints the data of the current record from a form.

When I try and print it it prints a page with the labels but no data. What am I doing wrong?

could I email this to someone and take a look at it if you don't understand what I am asking?

Any help would be appriciated
Thanks
DOUG

 

[BukHix]

Sweeto,

Here is a sample that does what you want.

Dim strString as String
strString = Me.Field

DoCmd.OpenReport "ReportName", acViewPreview, , _
"[FieldOnReport] = '" & strString & "'"

The report will open and only the value that matches the Me.Field record will be shown.

 

[Sweeto]

does this code go in the report or the form?

thanks again

 

[jjturner]

Presumably, your 'Print Report' command button 'click' event on your form.

HTH,
John

 

[Sweeto]

Sweeto,

Here is a sample that does what you want.

Dim strString as String
strString = Me.Field

DoCmd.OpenReport "ReportName", acViewPreview, , _
"[FieldOnReport] = '" & strString & "'"

The report will open and only the value that matches the Me.Field record will be shown.

in this what does the Me.Field mean?

In my database the report name is "closing" my form is named "closing" and the the field I want to print is"date"

 

[jjturner]

sweeto,

'Me' is the VBA reference to your open form (it references 'itself' by calling it 'Me' - lookup in Access Help).

If I'm reading BukHix correctly, 'Field' will be the name of your field that you wish to filter/run your report by - in this case it sounds like you need to substitute 'Date' where BukHix has referenced 'Field', so use:

Me.Date

AND

If it is a true date, you may have to use the '#' instead of single quotes in the expression, like so:

"[FieldOnReport] = #" & strString & "#"

HTH,
John

 

[Shawny]

Want the bonehead method?
This is how you make this happen with a macro.
I put this on a command button, on click.
Action: Run Command
Command: Save record
Action: OpenReport
Report Name: duh
View: Print
Where: [date]=[Forms]![closing]![date]

 

[Sweeto]

the bone head method is always good...


thanks for the advice, I'll let you know if I figure this out

 

[Sweeto]

Thank You for all your advice I finaly got it to work properly