Imprimir página | Cerrar ventana

cambiar color de controles en report

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=84872
Fecha de impresión: 24/Abril/2024 a las 13:20


Tema: cambiar color de controles en report
Publicado por: cpampasPT
Asunto: cambiar color de controles en report
Fecha de publicación: 04/Diciembre/2019 a las 17:32
Hola Amigos
Tengo una duda sobre como cambiar el background color de algunos controles de mi report continuo
tengo el siguiente codigo  en el evento onFormat de la seccion detalhe del report
-----------------
Dim ctl As Control
For Each ctl In Me.Section(0).Controls

With ctl
       Select Case .Name
        Case  "Darb" 
                   If .Value > melhorD Then                           
                             Davg.BackColor = vbBlue
                  End If

    ' aqui hay otros case
     end select
End With
Next ctl
--------------
 Digamos que el informe tiene 5 lineas, correspondientes a 5 registros, y que uno de los controles (Darb) del tipo numerico, pretendo se cambie el color para azul unicamente para el "Darb" que tenga el valor mas alto en el informe, y que los demas  controles mantengan el background color de origen

El codigo que cole arriba me cambia el color, pero si en la siguiente linea/registro existe un valor superior ya no consigo deshacer  el color azul en el registro anterior.

Espero no haberme liado con la explicacion
Alguna idea ? gracias


Respuestas:
Publicado por: Mihura
Fecha de publicación: 04/Diciembre/2019 a las 17:47
Yo miraría de atacarlo por otro camino.

- lo primero averiguas el valor que vas a cambiar (con DMáx en el evento al abrir report, por ejemplo)
- después en el evento Format del detalle, preguntas por el valor del campo y si es el que buscas le cambias el color


-------------
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: cpampasPT
Fecha de publicación: 05/Diciembre/2019 a las 00:13
Jesus,
Hice como me dijiste, y al tener el valor maximo antes de que se ejecute el evento format del detalle ahora si  que recoje el color en el control deseado
Muchas gracias por tu amable ayuda
Saludos

Podeis cerrar el hilo


Imprimir página | Cerrar ventana