¿Cómo ejecutar una macro en excel condicionada?

Tengo una columna O que marco con la fecha en las filas que exporto. En la columna N introduzco una cantidad. Me gustaria que la macro al cambiar la columna N rellenase con color la celda si en la columna O hay una fecha. Sin relleno si no hay fecha. A posteriori que borre la fecha de la columna O para que me recuerde que esa fila la tengo que volver a exportar.

Esta es la macro que monté pero de esta manera me colorea todas las celdas N que modifico y yo solo quiero las que están ya exportadas.

A ver si me podeis echar un cable.

Muchas gracias de antemano.

Private Sub Worksheet_Change(ByVal Target As Range)
Application.EnableEvents = False
If Target.Column = 14 Then Target.Offset(, 1) = ""
If Target.Column = 14 Then Target.Interior.ColorIndex = 3
Application.EnableEvents = True
End Sub

1 respuesta

Respuesta
1

Prueba con lo siguiente y me comentas

Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Count > 1 Then Exit Sub
    Application.EnableEvents = False
    If Target.Column = 14 Then
        If IsDate(Target.Offset(, 1).Value) Then
            Target.Interior.ColorIndex = 3
            Target.Offset(, 1) = ""
        Else
            Target.Interior.ColorIndex = xlNone
        End If
    End If
    Application.EnableEvents = True
End Sub

'.[Sal u dos. Dante Amor. No olvides valorar la respuesta. 
'.[Avísame cualquier duda

'

(

.

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas