[Resolvido]Ultima Pagina do Relatorio

Boa tarde JPaulo

O seu exemplo num relatório da minha base de dados dá o seguinte erro. Uso Access 2003

" O número de página introduzido è inválido".

Eu cliko OK e abre o relatório na primeira página.

O meu relatório tem o nome "SaldosFimMes"

Abre Relatório Ms Access na Ultima Pagina

Private Sub SeuBotao_Click()
Dim I As Integer
DoCmd.OpenReport "SaldosFimMes", acViewPreview
I = Reports!SaldosFimMes.Pages
SendKeys "{F5}{Delete}"
SendKeys I & "{ENTER}"
End Sub

Bom Assis;

Private Sub SeuBotão_Click()
DoEvents
DoCmd.OpenReport "SaldosFimMes", acViewPreview
SendKeys "{End}", True
DoEvents
End Sub

Bom dia JPaulo

Quem sabe sabe.
Sucesso
Obrigado