Início
braga 13/6/2011, 12:17Pessoal, bom dia! Gostaria de saber como faço para visualizar o relatório e, após a visualização, aparecer a "caixa" de impressão, onde o usuário pode selecionar a impressora.
Aguardo resposta. Obrigado.
Aguardo resposta. Obrigado.
5 participantes
[Resolvido]Impressão e Visualização de Relatório
braga- Novato
- Respeito às regras :
Sexo :
Localização :
Mensagens : 1
Registrado : 10/06/2011
Convidado- Convidado
Voce pode criar uma MsgBox ao abrir o relatório com a instrução para o usuário apertar as teclas Ctrl + P
Saudações
Saudações
criquio- Moderador Global
- Respeito às regras :
Sexo :
Localização :
Mensagens : 11229
Registrado : 30/12/2009
Ou, ao abrir o relatório, colocar SendKeys "^P", assim, a sequência de teclas Ctrl+P é enviada automaticamente.
.................................................................................
Meu novo site: www.vcssistemas.com.br Clique aqui e veja um vídeo que explica como fazer pesquisas no forum. DICA: Quando precisar inserir um exemplo do seu aplicativo, siga os procedimentos abaixo: 1 - faça uma cópia do aplicativo 2 - retire tudo que não for necessário à solução do problema, exceto o que o aplicativo precisar para funcionar 3 - use o Compactar/Reparar 4 - compacte o aplicativo em zip ou rar (zip para postagem como anexo na mensagem) Agradeça a quem lhe ajudou, clicando no joinha de uma das mensagens do usuário. Positive as mensagens que achar útil, no canto superior direito delas. |
Convidado- Convidado
Tai... Beleza... Esse SendKeys é muito útil..
Grato Criquio...Somando conhecimentos chegamos a um ótimo resultado
Tenha um ótimo Dia!!
Grato Criquio...Somando conhecimentos chegamos a um ótimo resultado
Tenha um ótimo Dia!!
JPaulo- Moderador
- Respeito às regras :
Sexo :
Localização :
Mensagens : 11026
Registrado : 04/11/2009
Cuidado com o SendKeys, a segurança do sistema operativo pode interferir.
Veja o simples a abrir a caixa de dialogo do windows;
Private Sub SeuBotão_Click()
On Error GoTo 1
DoCmd.OpenReport "SeuRelatório", acViewPreview
'abre a caixa de dialogo do windows
DoCmd.RunCommand acCmdPrint
Exit Sub
1:
'trata o erro se cancelar a caixa de dialogo
If Err.Number = 2501 Then
MsgBox "Impressão Cancelada.....", vbOKOnly
Else
Exit Sub
End If
End Sub
Veja o simples a abrir a caixa de dialogo do windows;
Private Sub SeuBotão_Click()
On Error GoTo 1
DoCmd.OpenReport "SeuRelatório", acViewPreview
'abre a caixa de dialogo do windows
DoCmd.RunCommand acCmdPrint
Exit Sub
1:
'trata o erro se cancelar a caixa de dialogo
If Err.Number = 2501 Then
MsgBox "Impressão Cancelada.....", vbOKOnly
Else
Exit Sub
End If
End Sub
.................................................................................
Contribua com o maximoaccess nos links abaixo, ajude a melhorar este que é o seu site na NET.
Pay-Pal R$ Aqui
Pay-Pal € Aqui
Ou ainda: Aqui (Novo)
Sucesso e Bons Estudos
Success and Good Studies
![[Resolvido]Impressão e Visualização de Relatório Folder_announce_new](https://2img.net/i/fa/subsilver/folder_announce_new.gif)
Utilize o Sistema de Busca do Fórum... 102 Códigos VBA Gratuitos... Instruções SQL como utilizar...
JPaulo- Moderador
- Respeito às regras :
Sexo :
Localização :
Mensagens : 11026
Registrado : 04/11/2009
É apenas um pitaco, mas tendo recursos internos no Ms Access, é aproveitá-los, o resto virá se não existir alternativa, como o SendKeys da sugestão do Grande Criquio.
.................................................................................
Contribua com o maximoaccess nos links abaixo, ajude a melhorar este que é o seu site na NET.
Pay-Pal R$ Aqui
Pay-Pal € Aqui
Ou ainda: Aqui (Novo)
Sucesso e Bons Estudos
Success and Good Studies
Utilize o Sistema de Busca do Fórum... 102 Códigos VBA Gratuitos... Instruções SQL como utilizar...
Convidado- Convidado
Testei aqui a sua função JP... Ficou perfeitas.. as duas produzem o mesmo resultado.. apenas o alerta que nos deu sobre uso das sendKeys...No mais ..
PERFECT!
PERFECT!
LEAM- Super Avançado
- Respeito às regras :
Sexo :
Localização :
Mensagens : 696
Registrado : 02/04/2011
isso e importante
tenho que salvar na minha apostila
pois imprimo bastante
os 2 exemplos
tenho que salvar na minha apostila
pois imprimo bastante
os 2 exemplos
.................................................................................
Uma vida sem desafios não vale a pena ser vivida.
Assis- Maximo VIP
- Respeito às regras :
Sexo :
Localização :
Mensagens : 4772
Registrado : 06/11/2009
Bom dia Leam
Com este exemplo:
Visualiza o relatório que está selecionado na caixa.
Imprime o relatório que está selecionado na caixa.
E pode escolher a impressora
http://dl.dropbox.com/u/8169944/Ver%20ou%20imprimir.mdb
Com este exemplo:
Visualiza o relatório que está selecionado na caixa.
Imprime o relatório que está selecionado na caixa.
E pode escolher a impressora
http://dl.dropbox.com/u/8169944/Ver%20ou%20imprimir.mdb
.................................................................................
*** Só sei que nada sei ***
Convidado- Convidado
A como andas este tópico amigão???
criquio- Moderador Global
- Respeito às regras :
Sexo :
Localização :
Mensagens : 11229
Registrado : 30/12/2009
Como o criador do tópico não deu sinal de vida mais, vou encerrá-lo. Caso necessário, pode reabri-lo novamente.
.................................................................................
Meu novo site: www.vcssistemas.com.br Clique aqui e veja um vídeo que explica como fazer pesquisas no forum. DICA: Quando precisar inserir um exemplo do seu aplicativo, siga os procedimentos abaixo: 1 - faça uma cópia do aplicativo 2 - retire tudo que não for necessário à solução do problema, exceto o que o aplicativo precisar para funcionar 3 - use o Compactar/Reparar 4 - compacte o aplicativo em zip ou rar (zip para postagem como anexo na mensagem) Agradeça a quem lhe ajudou, clicando no joinha de uma das mensagens do usuário. Positive as mensagens que achar útil, no canto superior direito delas. |
Conteúdo patrocinado
Tópicos semelhantes
» Relatório para impressão de fotos de alunos: gera mas na visualização e na impressão "SEM FOTOS"
» Relatório para visualização e impressão
» [Resolvido]Impressão de relatório
» [Resolvido]mostrar mascara na visualização para impressão do relatório
» O gráfico criado no relatório não mostra a coluna na visualização de impressão.
» Relatório para visualização e impressão
» [Resolvido]Impressão de relatório
» [Resolvido]mostrar mascara na visualização para impressão do relatório
» O gráfico criado no relatório não mostra a coluna na visualização de impressão.