This Excel VBA macro gets the table name on an active worksheet.
Macro Example
Sub Getting Table Name() MsgBox ActiveSheet.ListObjects(1).Name End Sub
Description
[Application.]ActiveSheet
ActiveSheet...
The [Application.]ActiveSheet property returns an active Worksheet or Chart object. So the Object Browser shows us that returned value is “Object”.
The ActiveSheet property is a member of the Excel.Global class, so we can omit the Application property.
ActiveSheet.ListObjects (Worksheet.ListObjects)
ActiveSheet.ListObjects...
The ActiveSheet.ListObjects (Worksheet.ListObjects property) returns the ListObjects collection object on the active worksheet.
ListObjects(1) (ListObjects._Default(1) )
ActiveSheet.ListObjects(1)...
The ListObjects._Default property returns a single ListObject object from a ListObjects collection object.
And the ListsObjects._Default(1) represents the first ListObject object.
The _Default property is a default member of the ListObjects collection object. We can see a little blue marble beside its icon in the Object Browser.
So we can omit the ._Default .
ListObjects(1).Name (ListObject.Name)
ActiveSheet.ListObjects(1).Name
The ListObjects(1).Name (ListObject.Name property) returns or sets a String value that represents the name of the ListObject object.
Sub Getting Table Name() MsgBox ActiveSheet.ListObjects(1).Name End Sub
Properties
http://www.relief.jp/itnote/archives/excel-vba-getting-table-names.php
Apply to
- Excel 2013
- Excel 2010
- Excel 2007