error on print current record

[mar7632]

Hi everyone,

I have a problem with the next code:

Private Sub btnImprimir_Click()
DoCmd.OpenReport "Informe_Correo", acNormal, "", "[aa_DatosRecibidos]![id_item]=" & Me.id_item
End Sub

Informe_correo = report
aa_DatosRecibidos = table



My goal is to print the current record I am in a form. When the button is clicked a window comes up:


What I expect is that the Print setting appears but it doesnot. When I close this window an error takes places highlighting the code I wrote before. And when I create a PDF (by saving it)the printing does not take place.

There are another codes which are functional but it takes 2 steps to print. (you click the button on a certain record and then the report is opened and you are are able to print it.) My idea is to carry out this things using the form.

What is it happening? Any idea?

Thank you in advance

[Minty]

You have to filter the report using a report field, not another tables field value.
Assuming ID_Item is in the report then your code should simply be

DoCmd.OpenReport "Informe_Correo", acNormal, , "[id_item]=" & Me.id_item

[June7]

Don't see anything wrong with code. Looks like PDF print driver is default printer. Or report Page Setup has been set to use PDF printer.