Ocultar espacios Nulos o ceros
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=84737
Fecha de impresión: 27/Marzo/2026 a las 00:23
Tema: Ocultar espacios Nulos o ceros
Publicado por: emandres
Asunto: Ocultar espacios Nulos o ceros
Fecha de publicación: 04/Octubre/2019 a las 10:36
|
Buenos dias! Tengo otro problema, dentro de un informe tengo varios cuadro de texto que tienen un tamaño considerable, y lo que necesito que cuando no tengan valores no me lo presente y que no ocupe espacio en la presentación del informe (me deja el hueco en blanco), no se, si esta bien explicado,
|
Respuestas:
Publicado por: VIMIPAS
Fecha de publicación: 04/Octubre/2019 a las 11:18
|
Hola emandres.
¿Has probado con las propiedades del control ese "autoextensible" y "autocomprimible".? Saludos
------------- Gracias
|
Publicado por: emandres
Fecha de publicación: 04/Octubre/2019 a las 12:47
Ambos están en si.If (Me![Texto467] <> "") Then
Me.Texto467.Visible = True
Else
Me.Texto467.Visible = False
End If He puesto esto pero hay algo que no entiende y no lo hace, yo no veo donde esta el error
|
Publicado por: prga
Fecha de publicación: 04/Octubre/2019 a las 16:25
|
Hola. Pero, ¿Dónde has puesto ese código? Ya comentas. Un saludo a todos
|
Publicado por: Antonalo
Fecha de publicación: 06/Octubre/2019 a las 16:40
|
Yo pondría el evento en activar el registro y el if de esta manera
if Nz(Me.Texto467)= "" then Me.Texto467.Visible = True Else Me.Texto467.Visible = False End If
|
Publicado por: emandres
Fecha de publicación: 07/Octubre/2019 a las 10:38
http://www.filebig.net/files/b68U4MdaYN
Private Sub Report_Current() If Nz(Me.Texto467) = "" Then Me.Texto467.Visible = True If Nz(Me.Etiqueta475) = "" Then Me.Etiqueta475.Visible = True If Nz(Me.Etiqueta477) = "" Then Me.Etiqueta477.Visible = True If Nz(Me.Texto472) = "" Then Me.Texto472.Visible = True If Nz(Me.Texto476) = "" Then Me.Texto476.Visible = True Else Me.Texto467.Visible = False Me.Etiqueta475.Visible = False Me.Etiqueta477.Visible = False Me.Texto472.Visible = False Me.Texto476.Visible = False End If End Sub Pero me visualiza los campos de Densidad y humedad (la imagen que he adjuntado) Necesito que no lo muestre y no ocupe espacio
|
Publicado por: prga
Fecha de publicación: 07/Octubre/2019 a las 11:28
|
Hola. Salvo mejor opinión. 1º.-No todos los eventos se "disparan" en todas las formas de presentación de un informe. El evento current sólo se dispara en la vista presentación, pero no en la vista previa de impresión o impresión y tampoco en la vista informe. 2º.-No hay que confundir valores nulos con cadenas vacías ( space(0)="") ni con ceros 3º.-Si se hace invisible un cuadro de texto o similar, el espacio quedará en el informe aunque no se vea 4º.-Repito, salvo mejor opinión, sólo se pueden "quitar" secciones completas en el evento format (Vista previa impresión) de las mismas. 5º.-Una chapuza pasa por hacer los cuadros de texto de una altura de décimas de milímetro y hacerlos autoextensibles. Al hacerlos invisibles el espacio que ocupan es muy pequeño, pero no deja de ser una chapuza. 6º.-????? Espero que ayude a resolver la duda y no líe mas el asunto Ya comentas. Un saludo a todos
|
Publicado por: emandres
Fecha de publicación: 07/Octubre/2019 a las 12:15
|
Gracias, pero no se que me quieres decir. Parece que estas molesto con mi forma de plantear mi problema, lo he desarrollado según me han aconsejado, si tuviera claro como hacerlo no pediría ayuda.
|
Publicado por: xavi
Fecha de publicación: 07/Octubre/2019 a las 12:57
|
Hola,
1. Aquí solo te has molestado tu 2. Lo has desarrollado como te ha aconsejado Antonalo, no como te ha aconsejado VIMIPAS 3. Los consejos de prga siguen siendo totalmente válidos.
Los que colaboramos en el foro lo hacemos con el ánimo de ayudar, no de molestar. Quien tiene el problema eres tu. Algunos vamos hasta arriba de trabajo y aun asi, dedicamos algo de tiempo a responder preguntas.
Un saludo
------------- Xavi, un minyó de Terrassa
http://www.llodax.com" rel="nofollow - Mi web
|
Publicado por: emandres
Fecha de publicación: 07/Octubre/2019 a las 13:20
|
A veces se mal interpretan las cosas, pido perdón, no ha sido mi intención molestar, porque desde que estoy en este foro me han ayudado mucho, y agradezco que hagan el esfuerzo de contestar y poder ayudar, pero ahora mismo estoy en blanco y no comprendo muy bien. Los campos los tengo "autoextensible" y "autocomprimible" y la funcion de no mostrar tambien lo habia conseguido, el problema lo he tenido que al presentar el informe me guarda el espacio aunque no tenga datos, alguien me dijo que pusiera If Nz(Me.Texto467) = "" Then y no me lo hace bien. Un saludo
|
Publicado por: emandres
Fecha de publicación: 08/Octubre/2019 a las 10:06
|
Imagen del diseño
http://www.filebig.net/files/vUXcxBDkGS
Presentación del mismo http://www.filebig.net/files/AZz6fDqQ65
|
Publicado por: pitxiku
Fecha de publicación: 08/Octubre/2019 a las 11:12
Entiendo que esto forma parte del otro problema que tenías, con los saltos de página.
Sin saber exactamente cómo tienes los datos, lo único que se me ocurre es lo que te ha dicho prga: dejar los altos de los controles casi a cero, sin nada de código (ocultar/mostrar), y que trabaje la propiedad Autoextensible.
Si no funciona, convierte las etiquetas a cuadro de texto (una etiqueta siempre tendrá el mismo título, y con un SiInm/Iif dale el título dependiendo de si tiene valor el otro cuadro de texto.
|
Publicado por: emandres
Fecha de publicación: 08/Octubre/2019 a las 13:35
|
Funcionaria si no tuviera campo como objetoOle no le puedo poner extensible ni autocomprimible tengo que dejarlo del tamaño real de la tabla para que se vea bien. Son todo inconvenientes, pero gracias por la ayuda, porque con solo cuadros de texto funcionaria. Seguiré investigando... Un saludo
|
Publicado por: Antonalo
Fecha de publicación: 08/Octubre/2019 a las 15:56
|
Perdona emandres, no leí bien tu cuestión y me equivoqué con la respuesta. Aquí todos queremos ayudar, yo he aprendido aquí casi todo lo que sé, por ello también quisiera poder ayudar y lo hago con esa intención.
Me parece una cuestión muy interesante lo que dice prga en su punto 4º acerca del evento format. Yo también he tenido a veces el problema de los campos vacíos que ocupan espacio y lo he solucionado con la propiedad autoextensible pero lo de prga hay que probarlo.
|
Publicado por: emandres
Fecha de publicación: 09/Octubre/2019 a las 12:32
|
Yo no consigo dar con la solución, Antonalo si das con la solución, nos lo cuentas. Un saludo
|
Publicado por: MexMan70
Fecha de publicación: 10/Octubre/2019 a las 03:09
Creo que lo que estas pidiendo se podría resolver filtrando esos campos a cuando sean mayor a cero (o diferente A cero eso tu lo sabrás). Saludos
------------- OneDrive: http://sdrv.ms/Vk6eJd
|
Publicado por: pitxiku
Fecha de publicación: 10/Octubre/2019 a las 10:20
Si puedes subir una copia de la base de datos, se podría ver cómo tienes todo y tal vez dar alguna otra solución.
Con el informe y las tablas que usa el informe es suficiente. Y por supuesto, en caso de que haya datos personales o de otra índole, cambialos por otros ficticios.
|
Publicado por: emandres
Fecha de publicación: 10/Octubre/2019 a las 11:22
|
ejemplo: diseño informe http://www.filebig.net/files/LMh6VKxgDc
Mirar los huecos en blanco que hay en el informe: http://www.filebig.net/files/dpt9Y7p4Pi
Mas o menos se entiende?
|
Publicado por: emandres
Fecha de publicación: 17/Octubre/2019 a las 10:23
|
No se muy bien a que te refieres, pero si lo supiera lo pondría en practica, si me puedes aclarar mejor lo de resolver filtrando. Un saludo
|
Publicado por: emandres
Fecha de publicación: 23/Octubre/2019 a las 13:25
|
Hola, que tal, estoy mirando cosas por internet y he encontrado (HasData) parece ser, que es para no mostrar subinformes, pero no se como se aplica, alguien lo ha utilizado? Gracias
|
|