Klasse ModelTableColumn (Excel VBA)

Die Klasse ModelTableColumn stellt eine einzelne Spalte innerhalb eines modelable -Objekts dar.

Set

Um eine ModelTableColumn -Klassenvariable zu verwenden, muss sie zuerst instanziert werden, beispielsweise

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

Die folgenden Prozeduren können zum Festlegen der ModelTableColumn Klassenvariablen verwendet werden : ModelRelationship.ForeignKeyColumn, ModelRelationship.PrimaryKeyColumn, ModelTableColumns.Item und ModelTable.ModelTableColumns

For Each

Hier ist ein Beispiel für die Verarbeitung der ModelTableColumn -Elemente in einer Sammlung

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

DataType

Gibt die XlParameterDataType -Aufzählung des ModelTableColumnzurück.

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

Name

Gibt einen String -Wert, der den Namen des Objekts darstellt.

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

Parent

Gibt ein Object zurück, das das übergeordnete Objekt des angegebenen ModelTableColumn -Objekts darstellt.

ModelTableColumns.Count

Gibt einen Long -Wert zurück, der die Anzahl der ModelTableColumn -Objekte in einem ModelTableColumns -Objekt darstellt.

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

ModelTableColumns.Item

Gibt ein ModelTableColumn -Objekt aus der ModelTableColumns -Auflistung zurück.

Syntax : expression.Item (Index)

Index: Die Indexnummer für das Objekt

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

ModelTableColumns.Parent

Gibt ein Object zurück, das das übergeordnete Objekt des angegebenen ModelTableColumns -Objekts darstellt.