InícioBoa Noite.
preciso de um codigo para imprimir a tabela do suformulario atual.
agradeço pela ajuda desdde já
preciso de um codigo para imprimir a tabela do suformulario atual.
agradeço pela ajuda desdde já
2 participantes
Imprimir os dados do sub-formulário atual com botao imprimir
erilioaraujo- Intermediário
- Respeito às regras :
Sexo :
Localização :
Mensagens : 54
Registrado : 18/01/2012
- Mensagem nº1
Imprimir os dados do sub-formulário atual com botao imprimir
erilioaraujo 23/6/2018, 02:51
Silvio- Developer
- Respeito às regras :
Sexo :
Localização :
Mensagens : 5074
Registrado : 20/04/2011
- Mensagem nº2
Re: Imprimir os dados do sub-formulário atual com botao imprimir
Silvio 25/6/2018, 11:35
Bom dia.
Em um botão de comando, evento click:
Em um botão de comando, evento click:
- Código:
Private Sub bt_imprimir_Click()
On Error Resume Next
Dim strDocName As String
Dim strFilter As String
strDocName = "NomedoDocumentoASerImpresso"
strFilter = "ChavePrimaria= Forms!NomeFormularioPrincipal!NomeSubFormulario.Form!ChavePrimaria"
DoCmd.OpenReport strDocName, acViewNormal, , strFilter
End Sub
.................................................................................
Caso tenha resolvido a tua duvida, coloque o tópico como resolvido.
www.maximoaccess.com/t860-resolucao-de-topicos
"Quase tudo é possível quando se tem determinação e força de vontade. Não desista tão rápido."
|
|
|