Imprimir página | Cerrar ventana

Pie de Pagina

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=84627
Fecha de impresión: 15/Diciembre/2019 a las 03:47


Tema: Pie de Pagina
Publicado por: emandres
Asunto: Pie de Pagina
Fecha de publicación: 30/Julio/2019 a las 09:32
Buenos dias! estoy diseñando un informe donde el campo Observaciones con su etiqueta quiero que me lo muestre en el pie de pagina pero en la ultima pagina, pero no lo consigo

Private Sub PieDePágina2_Format(Cancel As Integer, FoPrivate Sub PieDePágina2_Format(Cancel As Integer, FormatCount As Integer)

If Me.Page = Me.Pages Then

'OBSERVACIONES' & Me.OBSERVACIONES.Visible = True

Else

'OBSERVACIONES' & Me.OBSERVACIONES.Visible = False

End If

End Sub

Si me pueden ayudar, Muchas graciasCry



Respuestas:
Publicado por: Mihura
Fecha de publicación: 30/Julio/2019 a las 09:42
No le veo sentido a esto:
    'OBSERVACIONES' & Me.OBSERVACIONES.Visible = True



Suponiendo que el campo del pie del informe se llame LiteralPie (y que tenga ya el valor que quieras mostrar):

if me.Page = me.pages then
    me.literalPie.visible = true
else
    me.literalpie.visible = false
end if


-------------
Jesús Mansilla Castells.
Saludos desde Móstoles.

http://www.accessaplicaciones.com" rel="nofollow - Access Aplicaciones
http://www.tecsys.es" rel="nofollow - Tecsys.es


Publicado por: emandres
Fecha de publicación: 30/Julio/2019 a las 13:26
  'OBSERVACIONES' & Me.OBSERVACIONES.Visible = True
No se como hacer referencia a la etiqueta del campo OBSERVACIONES para que tambien sea visible al final del pie de pagina, no entiendo nada de modulosCry


Publicado por: Mihura
Fecha de publicación: 30/Julio/2019 a las 14:15
Pues la etiqueta tiene un nombre y también tiene la propiedad visible, al igual que un campo de texto.
Trátala igual.


-------------
Jesús Mansilla Castells.
Saludos desde Móstoles.

http://www.accessaplicaciones.com" rel="nofollow - Access Aplicaciones
http://www.tecsys.es" rel="nofollow - Tecsys.es


Publicado por: emandres
Fecha de publicación: 31/Julio/2019 a las 08:46
Te agradecería que fueras mas claro porque no comprendo que es lo que me quieres decir, porque si lo pongo asi:

Private Sub PieDePágina2_Format(Cancel As Integer, FormatCount As Integer)

If Me.Page = Me.Pages Then

Me. OBSERVACIONES.Visible = True

Else

Me. OBSERVACIONES.Visible = False

End If

End Sub

Asi me lo hace muy bien, pero no visualiza la etiqueta y es lo que no entiendo de tu explicación.

Un saludo



Publicado por: Mihura
Fecha de publicación: 31/Julio/2019 a las 08:57
Pues no es tan complicado,

- el campo tiene un nombre "Observaciones" y lo pones visible o invisible con:
     Me.Observaciones.visible = False


- pues la etiqueta tiene su propio nombre "EtiquetaXX" y para manejarlo:
     Me.EtiquetaXX.visible = false


Dices que no entiendes nada de módulos (VBA) y quieres manejarlos, necesitas aprender. En este foro hay un excelente curso de iniciación al Access de Eduardo Olaz, hazlo, verás que bien te viene. Wink




-------------
Jesús Mansilla Castells.
Saludos desde Móstoles.

http://www.accessaplicaciones.com" rel="nofollow - Access Aplicaciones
http://www.tecsys.es" rel="nofollow - Tecsys.es


Publicado por: emandres
Fecha de publicación: 31/Julio/2019 a las 09:46
Muchas gracias ya lo he comprendido y me ha funcionado perfectamente, estoy muy contenta y en mis huecos intentare hacer el curso que me propones.

Un saludo

Ya se puede cerrar este hilo
Thumbs Up



Imprimir página | Cerrar ventana