Clase ModelTable - una tabla en el modelo de datos (Excel VBA)

La clase ModelTable representa una tabla en el modelo de datos. Para usar una variable de clase ModelTable, primero debe ser instanciado, por ejemplo

Dim mdlt as ModelTable
Set mdlt = ActiveWorkbook.Model.ModelTables(Index:=1)

For Each

A continuación, se muestra un ejemplo de cómo procesar los elementos ModelTable en una colección.

Dim mdlt As ModelTable
For Each mdlt In ActiveWorkbook.Model.ModelTables
	
Next mdlt

ModelTableColumns

Colección de objetos ModelTableColumns que componen la modeltable.

Dim mtcsModelTableColumns As ModelTableColumns
Set mtcsModelTableColumns = ActiveWorkbook.Model.ModelTables(1).ModelTableColumns

Name

Devuelve un valor de tipo String que representa el nombre del objeto.

Dim strName As String
strName = ActiveWorkbook.Model.ModelTables(1).Name

RecordCount

Devuelve el número total de filas de la tabla de modelos.

Dim lngRecordCount As Long
lngRecordCount = ActiveWorkbook.Model.ModelTables(1).RecordCount

Refresh

Actualiza las conexiones de origen de la tabla del modelo.

ActiveWorkbook.Model.ModelTables(1).Refresh

SourceName

Nombre del origen de datos de la tabla.

Dim strSourceName As String
strSourceName = ActiveWorkbook.Model.ModelTables(1).SourceName

SourceWorkbookConnection

Devuelve la conexión del libro desde la que se originó la tabla de modelo.

Dim wbconSourceWorkbookConnection As WorkbookConnection
Set wbconSourceWorkbookConnection = ActiveWorkbook.Model.ModelTables(1).SourceWorkbookConnection