PauloGuerra

Membros
  • Content Count

    1
  • Joined

  • Last visited

Community Reputation

0 Neutro

About PauloGuerra

  1. Exmos Tenho o seguinte comando associado a um botão: Private Sub Command182_Click() On Error GoTo Err_Command182_Click Dim stDocName As String stDocName = "DESCRITIVO_RESUMO" DoCmd.OpenReport stDocName, acPreview (QUERO APENAS OBTER A 1ª PÁGINA) Exit_Command182_Click: Exit Sub Err_Command182_Click: MsgBox Err.Description Resume Exit_Command182_Click End Sub Mas preciso criar uma condição por forma a apenas obter a primeira página no comando "acPreview", ou seja tenho algumas páginas na pré-visualização e quero apenas obter a primeira. thanks