RE:Resaltar una linea alternativa en un informe co
Esto es para una Línea (Aqui la llamo LineaColor);aunque lo puedes adaptar para un cuadro de texto.
Primero coloca un cuadro de texto en el informe para numerar los registros (txtContador):
Origen del control: =1
Suma continua: sobre todo, o sobre grupo
Visible: No
En el evento al dar formato
Private Sub Detalle_Format(Cancel As Integer, FormatCount As Integer)
Dim intColorLinea As Integer
intColorLinea = Me.txtContador Mod 2
If intColorLinea = 0 Then
Me.LíneaColor.BorderColor = vbRed 'pone de color rojo los registros pares
Else
Me.LíneaColor.BorderColor = vbBlack 'pone de color negro los registros impares
End If
End Sub
Saludos