[Resolvido]Imprimir um relatório

Boa tarde tem um formulário e quero quando clicar em um botão ele imprima todos os registros dessa tabela. Por favor, alguém pode me ajudar

Boa Tarde

Se é para imprimir todos os registos, basta assim:

Um botão de comando e no evento click()

Dim stDocName As String

stDocName = "NomedoRelatório"
DoCmd.OpenReport stDocName, acNormal

por que, quando vai imprimir abre uma janela pra salvar o arquivo. Tem como não abrir essa janela?

Dim stDocName As String
DoCmd.setwarnings=False
stDocName = "NomedoRelatório"
DoCmd.OpenReport stDocName, acNormal
DoCmd.SetWarnings=True

Teste, please, pois no meu não abre nenhuma janela a não a informar que está a imprimir.

Private Sub impr_listagem_Click()
Dim stDocName As String
DoCmd.SetWarnings = true
stDocName = "relato_cliente"
DoCmd.OpenReport stDocName, acNormal

Estar dando erro de compilação, o sistema fala que o argumento não é opcional

Private Sub impr_listagem_Click()
Dim stDocName As String
DoCmd.SetWarnings = False
stDocName = "relato_cliente"
DoCmd.OpenReport stDocName, acNormal
DoCmd.SetWarnings = True
End Sub

Oi boa tarde vieira tirei o simbolo de =, parou de dar erro mais ainda continua abrindo a janela salvar.
Private Sub impr_listagem_Click()
Dim stDocName As String
DoCmd.SetWarnings False
stDocName = "relato_cliente"
DoCmd.OpenReport stDocName, acNormal
DoCmd.SetWarnings False
End Sub

Dessa forma não dar erro mais continua abrindo a janela pra salvar.

Olá

No evento do seu relatório use o save. exemplo

Private Sub Report_Open(Cancel As Integer)
DoCmd.Save acReport, Me.Name
End Sub

Se ainda não for isso, acrecente a linha no código

Private Sub impr_listagem_Click()
docmd.RunCommand acCmdSaveRecord 'salva o registro atual para refletir no relatório
DoCmd.OpenReport "relato_cliente", acNormal
End Sub

Sim, desculpe, sem o igual, foi distracção minha.

Se você quer imprimir toda a tabela, não vejo necessário o guardar o registro, uma vez que os mesmos já estarão guardados na tabela. O próprio Access, guarda por defeito. Se a impressão é a tabela, não vejo o porquê de com este comando simples abrir alguma janela adicional:

DoCmd.OpenReport "relato_cliente", acNormal

abre a janela e pedi pra salvar com essa extensão *.xps

Então alguma coisa está mal aí na sua BD, presumo. Não tenho o 2010, mas seria melhor você postar aqui no fórum a sua BD para que um colega com o 0 2010 pudesse ver o que se estar a passar. Penso que o Criquio tem o 2010. Coloque aqui a BD.

Veja aqui este link da MIcrosoft sobre o visualizador XPS

http://windows.microsoft.com/pt-PT/windows-vista/What-is-the-XPS-Viewer

avelino valeu mais não deu certo continua abrindo a janela salvar.
Não o meu é 2003 vou postar o bd

Antes de postar, leia sobre o visualizar XPS,no link que enviei.

Como não houve retorno, o tópico passa a resolvido. Qualquer coisa reabra, por favor.

Bom dia Vieira, desculpa por não retornar ,mais ainda estou com o mesmo problema abrir aquele link que você pediu não conseguir resolver.