Macro si SOLO cambia una celda con fórmula

Hola expertos
La cosa es la siguiente, tengo una celda(K20) que su valor depende de dos celdas(B20 y K7). He probado de todo, y cuando consigo lo que necesito falla por algún lado, esta macro se parece a lo que quiero:
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Target.Count > 1 Then Exit Sub
'Igual a 6
If Target.Cells = Range("K20") And Target.Value = 6 Then Call SF_Si_es_6
'Igual a 5
If Target.Cells = Range("K20") And Target.Value = 5 Then Call SF_Si_es_5
'Igual a 4
If Target.Cells = Range("K20") And Target.Value = 4 Then Call SF_Si_es_4
'Igual a 3
If Target.Cells = Range("K20") And Target.Value = 3 Then Call SF_Si_es_3
'Igual a 2
If Target.Cells = Range("K20") And Target.Value = 2 Then Call SF_Si_es_2
'Igual a 0
If Target.Cells = Range("K20") And Target.Value = 0 Then Call SF_Si_es_0
End Sub
El problema es que si en la celda K20 hay un 6 (por ejemplo) ya introducido, e introduzco un 6 en una celda cualquiera me ejecuta la macro... He mirado miles de posibilidades y ninguna me sirve.
Gracias de antemano.

1 respuesta

Respuesta
1
Al principio del "SUB" comprobaría que ha cambiado una de las 2 celdas de las que depende "K20". Si ha cambiado otra... hasta luego.
Sería poner esta línea:
    If Target.AddressLocal <> "$B$20" And Target.AddressLocal <> "$K$7" Then Exit Sub

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas