Cómo: Repetir registros de informe en un número especificado de veces en Access 2000

Seleccione idioma Seleccione idioma
Id. de artículo: 207664 - Ver los productos a los que se aplica este artículo
Este artículo se ha archivado. Se ofrece "tal cual" y no se volverá a actualizar.
Expandir todo | Contraer todo

En esta página

Resumen

Ciertos tipos de informes requieren que cada registro imprimirá un número específico de veces. Estos informes incluyen etiquetas que se utilizan para picking, envío y facturación o recortables formularios están pensados para varios destinatarios.

En el ejemplo siguiente se muestra cómo utilizar un cuadro de texto en un formulario independiente para especificar el número de veces que se debe imprimir cada registro en el informe.

Crear el informe y el código tras el informe

  1. Inicie Microsoft Access y, a continuación, abra la base de datos de ejemplo Neptuno.mdb.
  2. En la ventana base de datos, haga clic en informes y, a continuación, haga clic en nuevo .
  3. En el cuadro de diálogo Nuevo informe , haga clic en Autoinforme: columnas y basar el informe en la tabla transportistas . A continuación, haga clic en Aceptar .
  4. Guarde el informe como rptRepeatRecs .
  5. Abra el informe rptRepeatRecs en la vista Diseño.
  6. En el menú Ver , haga clic en código .
  7. En el Editor de Visual Basic, escriba o pegue el siguiente código:
    Option Explicit
    Dim intPrintCounter As Integer
    Dim intNumberRepeats As Integer
    
    Private Sub Report_Open(Cancel As Integer)
       intPrintCounter = 1
       intNumberRepeats = Forms!PrintForm!TimesToRepeatRecord
    End Sub
    					
  8. En el menú archivo , haga clic en Cerrar y volver a Microsoft Access .
  9. En el diseño de informe para el informe rptRepeatRecs, haga clic en la barra de detalle . Si la hoja de Propiedades no está ya visible, haga clic en Propiedades en el menú Ver .
  10. Haga clic en el cuadro de la propiedad AlImprimir (OnPrint) y, a continuación, haga clic en el botón Generar (... ) a la derecha.
  11. En el cuadro de diálogo Elegir generador , haga clic en Generador de código y, a continuación, haga clic en Aceptar .
  12. Escriba o pegue el código siguiente:
    Private Sub Detail_Print(Cancel As Integer, PrintCount As Integer)
       ' Note: intNumberRepeats and intPrintCounter are initialized
       ' in the report's OnOpen event.
       If intPrintCounter < intNumberRepeats Then
          intPrintCounter = intPrintCounter + 1
          ' Do not advance to the next record.
          Me.NextRecord = False
       Else
          ' Reset intPrintCounter and advance to next record.
          intPrintCounter = 1
          Me.NextRecord = True
       End If
    End Sub
    					
  13. En el menú archivo , haga clic en Cerrar y volver a Microsoft Access .
  14. Guarde y cierre el informe.

Crear un formulario que especifica el número de horas para repetir los registros

  1. En la ventana base de datos, haga clic en la ficha formularios y, a continuación, haga clic en nuevo . Crear un nuevo formulario en blanco en la vista Diseño que no se basa en ninguna tabla o consulta.
  2. Agregue un cuadro de texto al formulario y, a continuación, asígnele el nombre TimesToRepeatRecord .
  3. Asegúrese de que se presiona el botón Asistentes para controles en el cuadro de herramientas; a continuación, agregue un botón de comando al formulario.
  4. En el cuadro de diálogo Asistente para botones de comando , haga clic en Operaciones con informes en la lista categorías y, a continuación, haga clic en Vista previa del informe en la lista acciones . Haga clic en siguiente .
  5. Cuando se le pregunte qué informe desea que el botón de comando para obtener una vista previa, haga clic en rptRepeatRecs y, a continuación, haga clic en siguiente .
  6. Cuando se le pregunta si desea que el texto o una imagen en el botón, haga clic en texto y, a continuación, haga clic en siguiente .
  7. Nombre del botón PreviewReport y, a continuación, haga clic en Finalizar .
  8. Guarde el formulario como PrintForm y, a continuación, cambie a la vista formulario.
  9. Escriba 3 en el cuadro de texto TimesToRepeatRecord y, a continuación, presione ENTRAR.
  10. Haga clic en vista previa del informe .
Tenga en cuenta que Microsoft Access abre el informe rptRepeatRecs y que cada registro aparece tres veces en el informe.

Propiedades

Id. de artículo: 207664 - Última revisión: viernes, 24 de enero de 2014 - Versión: 2.0
La información de este artículo se refiere a:
  • Microsoft Access 2000 Standard Edition
Palabras clave: 
kbnosurvey kbarchive kbmt kbhowto kbhowtomaster KB207664 KbMtes
Traducción automática
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): 207664

Contact us for more help

Contact us for more help
Connect with Answer Desk for expert help.
Get more support from smallbusiness.support.microsoft.com