Table (ListObject Object) Change Event

[wsnyder]

Hi,

Using Excel 365.

Is there such a thing as Table (ListObject Object) Change Event or something better than Worksheet Change Event?
I have a Table on a worksheet. A user can enter a new item which triggers the code to sort the table and remove any duplicates.
However, I need to add a second table to the sheet.
It does not seem "elegant" to fire the code on Table1 when the only think the user changed was Table2.

Thanks,
-w

 

[NoSparks]

It does not seem "elegant" to fire the code on Table1 when the only think the user changed was Table2.

You can establish which table the change was in like this

Private Sub Worksheet_Change(ByVal Target As Range)

If Target.CountLarge > 1 Then Exit Sub

If Not Intersect(Target, ActiveSheet.ListObjects(1).Range) Is Nothing Then
    ' do what's required, message for demo purpose
    MsgBox "The change was part of the FIRST table"
End If

If Not Intersect(Target, ActiveSheet.ListObjects(2).Range) Is Nothing Then
    ' do what's required, message for demo purpose
    MsgBox "The change was part of the SECOND table"
End If

End Sub

 

[NoSparks]

Did you manage to find anything such as a Table (ListObject Object) Change Event ?
Or anything more 'elegant' than a single If-Then statement ?