Clase ModelTableColumn - una sola columna dentro de un objeto modeltable (Excel VBA)

La clase ModelTableColumn representa una sola columna dentro de un objeto modeltable. Para usar una variable de clase ModelTableColumn, primero debe ser instanciado, por ejemplo

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

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