Selecting a table in worksheet

[chadski778]

Is it possible to use VBA code to select a table in a worksheet? There is only one table in the worksheet

 

[ChrisOswald]

from here: mhtml:http://officeimg.vo.msecnd.net/en-us/files/165/865/AF010288256.mht

Sub FindAllTablesOnSheet()
    Dim oSh As Worksheet
    Dim oLo As ListObject
    Set oSh = ActiveSheet
    For Each oLo In oSh.ListObjects
        Application.Goto oLo.Range
        MsgBox "Table found: " & oLo.Name & ", " & oLo.Range.Address
    Next
End Sub

 

[chadski778]

This one isn't working for me

 

[Jerry Sullivan]

The code that Chris posted will display the name and address of each Table or "Listbox" object in the ActiveSheet. If you aren't getting any result, your table is probably not a "Listbox" object, but rather a standard range that has headers and data below it.

If that's the case and that range is the only data on the worksheet, then you can find many examples on this site that show how to select the data range on a worksheet.

 

[Jerry Sullivan]

The code that Chris posted will display the name and address of each Table or "Listbox" object in the ActiveSheet. If you aren't getting any result, your table is probably not a "Listbox" object, but rather a standard range that has headers and data below it.

I used the incorrect term here. The correct term is ListObject not Listbox object.