¿Por qué me parpadea una hoja?
Hola, tengo el siguiente evento declarado en una hoja de un libro, y resulta, que cada vez que ingreso algún dato en dicha hoja, en cualquier celda, me parpadea la hoja (es como si revisara algo) y (ademas es como si me descargara lo que ingrese, porque en el supuesto caso que quiero deshacer lo realizado con ctl z no me lo realiza)
Si me puedes ayudar, agradecido
Copio el código
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Target.Address("$R$3") <> "" Then
VENDEDOR = Range("S3")
ActiveSheet.ListObjects("Tabla_Verscom2k").Range.AutoFilter Field:=20, _
Criteria1:=VENDEDOR
End If
If Target.Address("$R$2") <> "" Then
zona = Range("S2")
ActiveSheet.ListObjects("Tabla_Verscom2k").Range.AutoFilter Field:=14, _
Criteria1:=zona
End If
End Sub
Por las dudas lo que realizo es filtrar una base de datos de acuerdo a dos celdas que traigo de una lista desplegable,
Muchas Gracias
Si me puedes ayudar, agradecido
Copio el código
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Target.Address("$R$3") <> "" Then
VENDEDOR = Range("S3")
ActiveSheet.ListObjects("Tabla_Verscom2k").Range.AutoFilter Field:=20, _
Criteria1:=VENDEDOR
End If
If Target.Address("$R$2") <> "" Then
zona = Range("S2")
ActiveSheet.ListObjects("Tabla_Verscom2k").Range.AutoFilter Field:=14, _
Criteria1:=zona
End If
End Sub
Por las dudas lo que realizo es filtrar una base de datos de acuerdo a dos celdas que traigo de una lista desplegable,
Muchas Gracias