ACC: Cómo filtrar un informe con el filtro de un formulario

IMPORTANTE: Este artículo ha sido traducido por un software de traducción automática de Microsoft (http://support.microsoft.com/gp/mtdetails) en lugar de un traductor humano. Microsoft le ofrece artículos traducidos por un traductor humano y artículos traducidos automáticamente para que tenga acceso en su propio idioma a todos los artículos de nuestra base de conocimientos (Knowledge Base). Sin embargo, los artículos traducidos automáticamente pueden contener errores en el vocabulario, la sintaxis o la gramática, como los que un extranjero podría cometer al hablar el idioma. Microsoft no se hace responsable de cualquier imprecisión, error o daño ocasionado por una mala traducción del contenido o como consecuencia de su utilización por nuestros clientes. Microsoft suele actualizar el software de traducción frecuentemente.

Haga clic aquí para ver el artículo original (en inglés): 145591
Este artículo se ha archivado. Se ofrece "tal cual" y no se volverá a actualizar.
Moderada: Requiere macro básico, codificación y las capacidades de interoperabilidad.
Resumen
En este artículo describe cómo crear un botón en un formulario filtrado que se abre un informe y se aplica el mismo filtro que está en el formulario para el informe.

Nota: En este artículo se explica una técnica demostrada en los archivos de ejemplo, RptSampl.exe (para Microsoft Access para Windows 95 versión 7.0) y RptSmp97.exe (para Microsoft Access 97). Para más información acerca de cómo obtener estos archivos de ejemplo, consulte los siguientes artículos en Microsoft Knowledge Base:
145777ACC95: Microsoft Access Sample Queries Available en el Centro de descarga

175072ACC97: Microsoft Access 97 Sample Queries Available en el Centro de descarga
Más información
En este ejemplo utiliza la base de datos de ejemplo Neptuno.mdb. La técnica implica crear un nuevo formulario y un nuevo informe. El formulario utiliza los procedimientos de evento para aplicar un filtro y para abrir el nuevo informe. El informe utiliza la propiedad Filter para aplicar el mismo filtro que se utiliza en el formulario.


  1. Abra la base de datos de ejemplo Neptuno.mdb.
  2. Utilice el Autoinforme: Tabular Asistente para crear un nuevo informe basado en la tabla de clientes. Cierre y guarde el informe como rptCustomers.
  3. Utilice el Autoformulario: tabla Asistente para crear un nuevo formulario basado en la tabla de clientes. Cierre y guarde el formulario como frmFilterForm.
  4. Abra frmFilterForm en la vista Diseño. Aumentar el tamaño de la sección de pie de página del formulario, de modo que puede contener tres botones de comando.
  5. Cree un botón de comando en el pie de formulario y establezca sus propiedades como sigue:
           Name:     cmdOpenReport       Caption:  Open Report       OnClick:  [Event Procedure]						

    Establezca el OnClick [procedimiento de evento] como sigue:
           Private Sub cmdOpenReport_Click()         If Me.Filter = "" Then           MsgBox "Apply a filter to the form first"         Else           DoCmd.OpenReport "rptCustomers", A_PREVIEW, , Me.Filter         End If       End Sub						
  6. Cree un segundo botón en el pie de formulario y establezca sus propiedades como sigue:
           Name:     cmdClearFilter       Caption:  Clear Filter       OnClick:  [Event Procedure]						

    Establezca el OnClick [procedimiento de evento] como sigue:
           Private Sub cmdClearFilter_Click()         Me.Filter = ""       End Sub						
  7. Cree un tercer botón en el pie de formulario y establezca sus propiedades como sigue:
           Name:     cmdClose       Caption:  Close       OnClick:  [Event Procedure]						

    Establezca el OnClick [procedimiento de evento] como sigue:
           Private Sub cmdClose_Click()         DoCmd.Close acForm, Me.Form.Name       End Sub						
  8. Establezca las siguientes propiedades para el formulario frmFilterForm:
           OnOpen:  [Event Procedure]       OnClose: [Event Procedure]						

    Establezca OnOpen del formulario [procedimiento de evento] como sigue:
           Private Sub Form_Open(Cancel as Integer)         Me.Filter = ""       End Sub     Set the form's OnClose [Event Procedure] as follows:       Private Sub Form_Close()         DoCmd.Close acReport, "rptCustomers"       End Sub						
  9. Cambie el formulario a la vista Formulario.
  10. En la barra de herramientas, haga clic en el botón Filtro por formulario para establecer un filtro y, a continuación, haga clic en el botón Aplicar filtro para aplicar el filtro.
  11. Haga clic en el botón informe abrir en el formulario. Debería aparecer un informe con el mismo filtro que se liquidó el formulario.
Referencias
Para obtener más información acerca de la propiedad Filter, buscar el índice de la Ayuda "Propiedad Filter" o pregunte el Ayudante de Office de Microsoft Access 97.

Para obtener más información acerca de filtro por formulario o filtro por selección, busque "Filtro por formulario" o "Filtro por selección" en el índice de Ayuda o pregunte al Ayudante de Office de Microsoft Access 97.

Advertencia: este artículo se tradujo automáticamente

Propiedades

Id. de artículo: 145591 - Última revisión: 12/04/2015 13:12:46 - Revisión: 3.1

Microsoft Access 95 Standard Edition, Microsoft Access 97 Standard Edition

  • kbnosurvey kbarchive kbmt kbfaq kbhowto KB145591 KbMtes
Comentarios