HELP with Print Current Record

  • Thread starter Newf via AccessMonster.com
  • Start date
N

Newf via AccessMonster.com

Good day! I am having a little trouble with my Print function. I am looking
to Print the Current Record that is selected on the form. I have this code
and it is showing all records to Print. Can anyone see the problem???

Dim strWHERE As String
If Me.Dirty Then 'Save any changes.
Me.Dirty = False
End If
If Me.NewRecord Then
MsgBox "SELECT A RECORD TO PRINT"
Else
strWHERE = "[tblPersonal.Id_Personal] = " & Me.[frm_IdPersonal]
DoCmd.OpenReport "rptTEST", acViewPreview, strWHERE
End If

Thanks in advance
Newf
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads


Top