Imprimir um relatório, com apenas o formulário atual.

Colegas, boa tarde!

Sou iniciante em access e conto com a compreensão por se tratar de uma pergunta, possivelmente, fácil. Mas vamos lá...

Queria que alguém me ensinasse com detalhes como faço para estar em um formulário e da tela atual de um formulário, eu apertar  botão de imprimir relatório e imprimir apenas um do diversos.

Uso o office 2010.

Não tenho consulta, apenas uma tabela e formulário.

Obrigado.

Saulo Leonardo

Saulo,

Este assunto é bastante recorrente.

Veja no link se consegue entender ...

https://www.google.com.br/search?hl=pt&as_q=&as_oq=abrir+relat%C3%B3rio+registro+atual&as_sitesearch=www.maximoaccess.com&gws_rd=cr,ssl&ei=0L5TVvW6J5G5wgSWj7_YBg

Amigo Uilson Brasil,

Como lhe disse, sou iniciante no assunto e até ter aberto registro no site e criado o tópico, busquei MUITA ajuda no google e youtube. Mesmo não tendo me ajudado, lhe agradeço por ter respondido.

Boa Noite amigo.

Crie um relatório tendo base sua tabela.
Nome Relatório: RelatorioTeste
Deve alterar o código onde está em negrito

No botão defina:

Private Sub bt_imprimir_cadastro_Click()
On Error Resume Next
Dim strDocName As String
Dim strFilter As String
If MsgBox("Imprimir esse registro?", vbQuestion + vbYesNo, "Imprimir") = vbYes Then
strDocName = "RelatorioTeste"
strFilter = "CodigoTabela=Forms!NomeFormulário!CodigoTabela"
DoCmd.OpenReport strDocName, acViewNormal, , strFilter
End If

End sub