Imprimir página | Cerrar ventana

Ocultar una seccion o un salto pagina de informe

Impreso de: Foro de Access y VBA
Categoría: Access y VBA
Nombre del foro: Access y VBA
Descripción del foro: Foro de programacion en Access (Con código y sin código)
URL: http://www.mvp-access.com/foro/forum_posts.asp?TID=84645
Fecha de impresión: 25/Febrero/2020 a las 02:13


Tema: Ocultar una seccion o un salto pagina de informe
Publicado por: main
Asunto: Ocultar una seccion o un salto pagina de informe
Fecha de publicación: 14/Agosto/2019 a las 10:47
Access_2010 vs Windowa_7

Buenos dias al grupo:
En un informe tengo un encabezado y un pie de grupo para una "Obra"
En el pie del grupo tengo un salto de página llamado "SaltoObra".
Puesto asi, siempre imprime una hoja en blanco de más
Trato de evitarlo con este procedimiento:
If Page = Pages Then
    Me.SaltoObra.visible = False
Else
    Me.SaltoObra.visible = True
End If
Lo tengo probado con varios eventos del informe pero no hace ni puñetero caso al menos con estos:
Private Sub PieDelGrupo1_Format(Cancel As Integer, FormatCount As Integer)
Private Sub Report_Page()

Creo que se debe a la estructura del informe, porque en otros casos de informes donde no hay encabezados ni pies de grupos funciona correctamente.
Tambien he probado a forzar nueva pagina despues de la seccion del pie de obra y aplicarle el siguiente procedimiento:

Private Sub Report_Page()
If Page = Pages Then
    Me.Section(6).ForceNewPage = 2
Else
    Me.Section(6).ForceNewPage = 0
End If
End Sub
Pero tampoco obedece




Respuestas:
Publicado por: emiliove
Fecha de publicación: 14/Agosto/2019 a las 15:13
Hola Main

Si esas hojas en blanco son un dolor de cabeza, mira esto:
https://support.microsoft.com/en-us/help/2525484/access-2010-extra-report-page-prints-when-group-footer-set-to-after-se" rel="nofollow -


Publicado por: Plinio Montano
Fecha de publicación: 14/Agosto/2019 a las 16:32
Colega,

Estube probando y no entiendo la necesidad de utilizar un control Salto de pagina, si en las propiedades del pie del grupo le activas forzar nueva pagina despues de la sección, por lo menos a mi me funsiona bien.

Tambien en los eventos al dar formato y al imprimir en la sección del evento pie de la sección puedes escribir:

Cancel = (Me.page = Me.pages)

De esta forma si coinside el nro de pagina con el totatal de paginas se cancela la sección.

Te reitero no veo la necesidad de emplear un control salto de pagina.

Saludos cordiales.





-------------
pmv


Publicado por: main
Fecha de publicación: 14/Agosto/2019 a las 19:14
Gracias a ambos por las respuestas:
La solución de Plinio no funciona
Y mirando el articulo recomendado por emilove funciona ponendo forzar nueva pagina en el enzabezado de la sección y no en el pie.
Parece que microsoft es consciente del problema.
Eso si, el encabezado de página hay que meterlo en el encabezado del grupo.
Saludos de nuevo.
Se puede cerrar el Tema.



Imprimir página | Cerrar ventana