[Resolvido]Duvida na visualização de relatorio

Estou com uma duvida no access 2007.
Fiz um controle de clientes estou com o formulario mais o relatorio.
Exemplo:

Quando estou no cliente no registro 34 e peço para ver o relatorio ele me exibe o REGISTRO 01.

Existe uma forma de quando estiver no registro 34 e quando abrir o relatorio para imprimir ele me exibe no registro 34?

obrigado

Olá Amigo

Teste assim no botão de comando para imprimir:
On Error Resume Next
Dim strDocName As String
Dim strFilter As String
strDocName = "nomerelatório"
strFilter = "Chaveprimária= Forms!seuformulário!Chaveprimária"
DoCmd.OpenReport strDocName, acViewNormal, , strFilter

Olá seja bem vindo ao fórum,

Existe sim e é o simples, para quem é iniciante;

Vincule o seu relatório a uma consulta, no critério do campo numero do registro na consulta, coloque:

Formulários.SeuFormulario.SeuCampoNumero

E voilá....

Quando pressionar o botão de abrir o relatório no seu formulário, já abre no registro igual ao do formulário.

ainda mais simples...

Private Sub SeuBotaoAbrirRelatorio_Click()
DoCmd.OpenReport "SeuRelatorio", acViewPreview, , "[CampoID]=" & Me.CampoID
End Sub

Olá a todos, primeiramente obrigado pela atenção de todos sobre minha duvida....

Utilizei o exemplo de ricardo

Private Sub SeuBotaoAbrirRelatorio_Click()
DoCmd.OpenReport "SeuRelatorio", acViewPreview, , "[CampoID]=" & Me.CampoID
End Sub

DoCmd.OpenReport "TB_PedSaida", acViewPreview, , "[CodPedSaida]=" & Me.CodPedSaida


Ele funciona é exibi a visualização do relatorio - Mais se eu quizer abrir o relatorio mesmo?

Obrigado a todos

Como abrir ?

Você já está a mandar abrir DoCmd.OpenReport

só pra complementar!

DoCmd.OpenReport "TB_PedSaida", acViewNormal, , "[CodPedSaida]=" & Me.CodPedSaida


Manda direto pra impressão!

Paulo,

Dessa forma ele exibe como visualização de impressão, nesse caso como o usuario vai imprimir.?

Eu estava pensando numa forma de ele exibir a visulização do modo de visualização do relatorio onde botei o botao imprimir no form do relatorio para o usuario clicar.

Mais uma vez obrigado pela ajuda...

no meu caso....

eu gosto de fazer um formulário de consulta e nesse formulário colocar um botão de impressão... acho melhor...


mas você pode fazer uma barra de ferramentas personalizada para o relatório com botão de imprimir, ou usar a barra de ferramentas impressão do próprio access!

Desta forma, vai abrir o Relatório em modo de visualização e abre tb a janela para Imprimir se quiser.


Private Sub SeuBotão_Click()
On Error GoTo 1:

DoCmd.OpenReport "TB_PedSaida", acViewPreview, , "[CodPedSaida]=" & Me.CodPedSaida

DoCmd.RunCommand acCmdPrint

1:
If Err.Number <> 0 And Err.Number <> 2501 Then
MsgBox "Error: " & Err.Number & vbNewLine & Err.Description
Exit Sub
End If

End Sub

jungli,

Foi isso que fiz um para visualizar a impressão e outro botão no menu apenas para impressão... agora esta ok....

Senhores,

Mais um vez obrigado pela ajudar e parabens pela site.....

ranieri

Ok...

Fico Feliz em ajudar!



Favor não esqueça de dar o tópico como resolvido! caso não aja mais dúvidas.