Cómo colocar un consecutivo en informe Access ?
Espero que estén muy bien !
Tengo un informe en Access con dos páginas, en cada página debo indicarle desde el formulario el consecutivo que va a llevar cada página.
Ejemplo: el formulario tiene 2 campos de texto( Consecutivo 1 y Consecutivo 2), entonces lo que se digite en el campo consecutivo 1 aparezca en la página 1 del informe y lo que se digite en el campo consecutivo 2 aparezca en la página 2 del informe.
Un formulario [F_Control] dos cuadros de texto [Dato1], [Dato2] y un botón para abrir el informe.
En el informe un cuadro de texto cuyo origen del control es:
=SiInm([Page]=[Pages];[Formularios].[F_control].[Dato2];[Formularios].[F_control].[Dato1])
Page es una variable del informe que indica la página actual
Pages es otra variable del formulario que indica cuantas páginas tiene
Se comparan ambas y para ese informe solo se dan dos casos:
.- Si son iguales estamos en la ultima página (la página dos)
.- Si son diferentes estamos en la primera página (la página uno)
Utilizando la función IIF (Silnm) asignamos el contenido del cuadro de texto del formulario que corresponda en función de la página activa.
2 respuestas más de otros expertos
I. Hola Compañero, sólo soy lector de la comunidad pero al tener interés en este ámbito quise buscar información, en estos días no logré poder formarme una opinión sobre lo que le ocurre ni vi enlaces válidos, pero en caso de que continúe sin llegar respuestas me gustaría trasladar su consulta a varios expertos del ámbito por si pudiesen responderle o bien, partiendo de sus conocimientos, pudiesen averiguar pistas o una posible valoración global de la operación que desea realizar. Perdone todas las molestias y el tipo de respuesta, ánimo.
Crear informe con un numero de consecutivo
https://estamosencontacto.wordpress.com/2010/08/07/numerar-registros-en-informe-de-access/
https://www.lawebdelprogramador.com/foros/Access/1789589-Formulario-para-registros-consecutivos.html
https://www.youtube.com/watch?v=E-mnNMD3S-k
https://computerhoy.com/paso-a-paso/software/como-numerar-lineas-informe-access-18149
https://www.youtube.com/watch?v=YC0iq5tD6rQ
Puede crear 1control de etiqueta en el informe y programar el evento Al dar formato. Por ejemplo.
Private Sub Detail_Format(Cancel As Integer, FormatCount As Integer)
' Verifica si el formulario está abierto
If CurrentProject.AllForms("miform").IsLoaded Then
' Accede a los valores de los controles en el formulario
If Me.Page = 1 Then
Me.lblConsecutivo.Caption = Forms!miform!txtConsecutivo1
ElseIf Me.Page = 2 Then
Me.lblConsecutivo.Caption = Forms!miform!txtConsecutivo2
End If
End If
End SubEn este código asumo que el nombre de la etiqueta en el informe se llama lblConsecutivo.