Clase ModelTableColumn (Excel VBA)

La clase ModelTableColumn representa una sola columna dentro de un objeto modeltable.

Set

Para usar una variable de clase ModelTableColumn, primero debe ser instanciado, por ejemplo

Dim mtc as ModelTableColumn
Set mtc = ActiveWorkbook.Model.ModelRelationships(1).ForeignKeyColumn

Los siguientes procedimientos se pueden usar para establecer variables de clase ModelTableColumn : ModelRelationship.ForeignKeyColumn, ModelRelationship.PrimaryKeyColumn, ModelTableColumns.Item y ModelTable.ModelTableColumns

For Each

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

Dim mtc As ModelTableColumn
For Each mtc In ActiveWorkbook.Model.ModelRelationships.ModelTableColumns
	
Next mtc

DataType

Devuelve la enumeración XlParameterDataType de ModelTableColumn.

Dim lngDataType As Long
lngDataType = ActiveWorkbook.Model.ModelRelationships(1).ForeignKeyColumn.DataType

Name

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

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

Parent

Devuelve un objeto Object que representa el objeto primario del objeto ModelTableColumn especificado.

ModelTableColumns.Count

Devuelve un valor de tipo Long que representa el número de objetos ModelTableColumn de un objeto ModelTableColumns .

Dim lngCount As Long
lngCount = ActiveWorkbook.Model.ModelTables(1).ModelTableColumns.Count

ModelTableColumns.Item

Devuelve un objeto ModelTableColumn de la colección ModelTableColumns .

Sintaxis : expression.Item (Index)

Index: Número de índice del objeto.

Dim mtc As ModelTableColumn
Set mtc = ActiveWorkbook.Model.ModelTables(1).ModelTableColumns(Index:=1)

ModelTableColumns.Parent

Devuelve un objeto Object que representa el objeto primario del objeto ModelTableColumns especificado.