Error en macro que se ejecuta a partir del valor de una celda
Tengo un libro excel con varias hojas y varias macros y me está dando continuamente el error "Se ha producido el error '13' en tiempo de ejecución: No coinciden los tipos" cuando se ejecuta una macro automáticamente a partir de haber encontrado un determinado valor en una celda.
1 respuesta
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Target.Address = "$K$6" And Target.Value = "JUAN PEREZ" Then
Juan_Perez
End If
If Target.Address = "$K$6" And Target.Value = "LUIS RODRIGUEZ" Then
Luis_Rodriguez
End If
End Sub
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Target.Address = "$K$6" Then
if Target.Value = "JUAN PEREZ" Then
Juan_Perez
else
if Target.Value = "LUIS RODRIGUEZ" Then
Luis_Rodriguez
end if
end if
End If
End Sub
***
Después de evaluar la celda K6, Puedes cambiar los if por un case
If Target.Address = "$K$6" Then
Select Case Target.Value
Case "JUAN PEREZ"
Juan_Perez
Case "LUIS"
Luis_Rodriguez
End Select
End If
Saludos. Dam
