Buenas noches a los miembros de este foro, en esta ocasión recurro a vuestra colaboración en el archivo adjunto en donde quisiera que al momento de digitar el código de trabajador parpadee la CELDA o la palabra "--- NO EXITE TRABAJADOR ---" la cual se ubican en la celda C2, C6 y C280,

Desde ya agradezco su apoyo brindado.

SORT1.xlsm

Para que parpadee la celda, hay que hacerlo con macros y te va a hacer muy lento el archivo. Lo que te recomiendo es que lo hagas con formatos condicionales (te dejo una opción).

Saludos

SORT1.xlsm

Hola amigo gfellay, la opcion brinda esta correcto y lo aplicare al archivo original, pero me encantaria tener tambien el diseño en macro, ya que podria adicionarlo en otros archivos que se requiera.

Gracias.

En tu módulo Pega el siguiente código:

Public Segundos  As Date
Sub Alerta()
On Error Resume Next
Segundos = Now + TimeValue("00:00:01")
Worksheets("INGRESOS").Activate
ultimafila = ActiveSheet.Cells.Find("*", SearchOrder:=xlByRows, SearchDirection:=xlPrevious).Row

For x = 2 To ultimafila
   If Cells(x, 3) = " --- NO EXITE TRABAJADOR --- " Then
      If Cells(x, 3).Font.Color = vbBlack Then
         Cells(x, 3).Font.Color = vbRed
         Cells(x, 3).Font.Bold = True
      Else
         Cells(x, 3).Font.Color = vbBlack
         Cells(x, 3).Font.Bold = False
      End If
   End If
Next x
Application.OnTime Segundos, "Alerta"
End Sub

y en ThisWorkbook

pega esta linea:

Private Sub Workbook_Open()
Application.OnTime Now + TimeValue("00:00:01"), "Alerta"
End Sub

Cualquier duda me comentas..
Saludos

 

 

 

Amigos gfellay y Diego9019, agradezco su apoyo y colaboración en ambos aportes brindados los cuales que me son muy útiles y lo único que me quedaría restar es dar como tema SOLUCIONADO

hay una alternativa (usando macros) sin vaciar la pila de niveles para el deshacer/undo/ctrl+Z (que es lo que sucede siempre que por código se modifican propiedades de objetos rango y similares)

mira si te sirve algo de lo comentado (en los extintos grupos nntp) en esta añeja conversación: celda parpadeante

saludos,

hector.