Donde poner .Font.Color = vbRed

[joselica]

Hola,

He encontrado una macro que hace parpadear la celda "C3".

Lo que no logro de hacer es:

En cuanto la celda "C3" es negativa el color de la fuente se ponga en blanco o negro. En el documento hay una explicacion detallada de lo que quiero.

Se que tengo que poner algo asi: .Font.Color = vbWhite, lo he puesto en varois sitios y me da error.

Adjunto el documento.

Muchas gracias.

Saludos,

PARPADEO CELDA - color TEXTO.xlsm

[ikanni]

Hola Joselica, ibas bien encaminada. Cambia en tu procedimiento 'StarBlink' la parte que esta por esta

With rRange
      If .Interior.ColorIndex = 3 Then
         .Interior.ColorIndex = xlNone
         .Font.Color = vbBlack
      Else
         .Interior.ColorIndex = 3
         .Font.Color = vbWhite
      End If
End With

SAludos

[joselica]

Hola ikanni,

Muchisimas gracias. Va bien, tal y como lo deseaba.

Doy el tema por solucionado.

Saludos,