Cómo crear un informe dinámico en MS Access

En Microsoft Access, un informe dinámico es un informe que hace algo por sí mismo: se crea o se abre o calcula un campo por sí mismo de modo que usted no tenga que hacerlo. Se especifica estas acciones automáticas durante el diseño del informe, utilizando el lenguaje de programación Visual Basic para Aplicaciones.

Instrucciones

1 Crear una tabla de muestra de las ventas de películas, utilizando los datos que siguen. Introduzca la fila superior de los datos como los nombres de campos de la tabla.

MovieTitle, Fecha de Venta, unitcost, qtysold
zhivogo doc 1/1/2009 $ 5.01,3
zhivogo doc, a 1/3/2009 $ 4.95,2
dirigir las verrugas, a 1/5/2009 $ 1.95,1
dirigir las verrugas, a 1/6/2009 $ 0.95,2
zhivogo doc, a 1/13/2009 $ 3.00,1

2 Seleccione "Crear", seguido de "Informe" para crear un nuevo informe. (Los usuarios de Access 2003, seleccione "Objetos", a continuación, haga clic en "Informes" y "nuevo".) Haga clic en la pestaña del nuevo informe y seleccione "Vista Diseño". Haga clic en el icono de control de cuadro de texto en la barra de herramientas de acceso, luego haga clic en un espacio vacío a la derecha de los campos existentes, en la sección "Detalle" del informe.

3 Seleccione el cuadro de texto a la izquierda del par de cuadros de texto que Access ha creado de forma automática, a continuación, pulse la tecla "suprimir". Haga clic en el cuadro de texto restante y seleccionar "Propiedades".

4 Haga clic en la pestaña "Datos" de la ventana "Hoja de propiedades", a continuación, introduzca el siguiente texto en el campo "control de código fuente":

= [Qtysold] * [unitcost]

5 Haga clic en la pestaña del informe y seleccione "Ver informe" para ejecutar el informe. Observe el nuevo campo calculado que ha agregado, que muestra la venta total (unidad de precio multiplicado por la cantidad vendida).

6 Haga clic en la pestaña del informe y seleccione "Vista Diseño", a continuación, haga clic derecho en cualquier parte del informe y haga clic en "Propiedades del informe." Haga clic en la pestaña "Eventos" de la ventana "Hoja de propiedades", haga clic en la flecha hacia abajo en el campo "en carga". Seleccione "Procedimiento de evento", haga clic en el botón "..." para entrar en el Visual Basic entorno de desarrollo integrado (IDE).

7 Pega el siguiente subrutina sobre la subrutina "Report_Load" existente:

Private Sub Report_Load ()
wday = día de la semana (Now ())
Si (wday = vbThursday) A continuación,

Me.Filter = "([moviesales].[movietitle] Like ""steer*"")"

Más

Me.Filter = "([moviesales].[movietitle] Like ""doc*"")"

Terminara si
Me.FilterOn = True
End Sub

Reemplazar el texto que lee "vbThursday" con "vb <día de la semana actual>"

8 Volver al acceso y volver a ejecutar el informe, siguiendo las instrucciones iniciales del paso 5. Tenga en cuenta que sólo las filas que contienen "dirigir verrugas" se muestran, debido a que su código de macro crea un filtro dinámico para dichas filas particulares, para los jueves.

9 Abra el informe de "Vista Diseño", utilizando a paso las instrucciones iniciales de 6. Regreso al evento "Report_Load" que ha introducido anteriormente (Vea el paso 6.) Sustituir el "VB <día de la semana actual>" con "vb <algún otro día de la semana>", a continuación, volver a ejecutar el informe. Tenga en cuenta que sólo se muestran las filas "doc zhivogo", basado en el cambio realizado en el código del programa.