¿Cómo Poner 2 eventos en una hoja?
Hola, Molesto al que sepa como debo nombrar dos worksheet change en una misma hoja, En realidad no se si seria eso o debro remplazarlo por otro evento, explico el porque
Estoy filtrando unos datos en una base de datos y quiero filtrar en una columna con el evento worksheet change, cosa que lo he logrado,
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
End Sub
Pero cuando quiero filtrar otra columna con otro worksheet change, no me lo realiza,
Private Sub Worksheet_Change2(ByVal Target As Excel.Range)
If Target.Address("$t$3") <> "" Then
zona = Range("S3")
ActiveSheet.ListObjects("Tabla_Verscom2k").Range.AutoFilter Field:=18, _
Criteria1:=zona
End If
End Sub
¿Estaré usando bien los eventos?
Ademas si me saben explicar, por que en una hoja que tiene este evento, parpadea cada vez que ingreso un dato a una celda
Muchísimas Gracias!
Estoy filtrando unos datos en una base de datos y quiero filtrar en una columna con el evento worksheet change, cosa que lo he logrado,
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
End Sub
Pero cuando quiero filtrar otra columna con otro worksheet change, no me lo realiza,
Private Sub Worksheet_Change2(ByVal Target As Excel.Range)
If Target.Address("$t$3") <> "" Then
zona = Range("S3")
ActiveSheet.ListObjects("Tabla_Verscom2k").Range.AutoFilter Field:=18, _
Criteria1:=zona
End If
End Sub
¿Estaré usando bien los eventos?
Ademas si me saben explicar, por que en una hoja que tiene este evento, parpadea cada vez que ingreso un dato a una celda
Muchísimas Gracias!
1 Respuesta
Respuesta de Cadipas spain
1