Klasse ModelTables (Excel VBA)

Eine Auflistung von Modelltabellen innerhalb des Datenmodells. Um eine ModelTables -Klassenvariable zu verwenden, muss sie zuerst instanziert werden, beispielsweise


Dim mts as ModelTables
Set mts = ActiveWorkbook.Model.ModelTables

For Each

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


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

Count

Gibt einen Long -Wert zurück, der die Anzahl der modelable-Objekte in einer ModelTables -Auflistung darstellt.


Dim lngCount As Long
lngCount = ActiveWorkbook.Model.ModelTables.Count

Item

Gibt ein einzelnes Objekt aus der ModelTables -Auflistung zurück.

Item (Index)

Index: Die Indexnummer oder der Name des Objekts.


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