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.
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 de santiagomf
1