Access - Rectangulos con colores en informes

   
Vista:

Rectangulos con colores en informes

Publicado por Ricardo Ramirez (1 intervención) el 09/03/2010 18:32:44
Hola que tal! Mi duda es que ya tengo mi base de datos completa, pero tengo que mandar a imprimir un informe el cual tenga un rectangulo que se ilumine dependiendo de 2 campos los cuales se comparan, un ejemplo de la macro que uso en el formulario:

Private Sub rectangulo_color()

If CAMPO1 > CAMPO2 Then
nivel.BackStyle = 1
nivel.BackColor = RGB(255, 0, 0)
End If

If CAMPO1 < CAMPO2 Then
nivel.BackStyle = 1
nivel.BackColor = RGB(0, 255, 0)
End If

If CAMPO1 = CAMPO2 Then
nivel.BackStyle = 1
nivel.BackColor = RGB(255, 255, 0)
End If

End Sub

Private Sub Form_Current()

rectangulo_color

End Sub


Pero en el informe no pasa nada, es posible esto?
Gracias de antemano
Ricardo
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Rectangulos con colores en informes

Publicado por Jefferson (135 intervenciones) el 12/03/2010 21:41:27
Hola Ricardo Ramirez

Cuando se Copia y Pega un Codigo y no se detiene a enteder el porque y de donde viene todo, suele suceder eso....

Private Sub Form_Current() .......??????????

De donde sale eso

Desde Venezuela
Jefferson
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar