Classe ModelTables (Excel VBA)

Uma coleção de tabelas de modelo dentro do modelo de dados. Para usar uma variável de classe ModelTables, ela primeiro precisa ser instanciada por exemplo

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

For Each

Aqui está um exemplo de processamento dos itens ModelTables em uma coleção.

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

Count

Retorna um valor Long que representa o número de objetos modeltable em uma coleção ModelTables . Somente leitura.

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

Item

Retorna um único objeto da coleção ModelTables .

Item (Index)

Index: O número de índice ou o nome do objeto.

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