Classe ModelTableColumns - uma coleção ModelTableColumn de colunas únicas dentro de um objeto modeltable (Excel VBA)
A classe ModelTableColumns representa uma coleção ModelTableColumn de colunas únicas dentro de um objeto modeltable . Para usar uma variável de classe ModelTableColumns, ela primeiro precisa ser instanciada por exemplo
Dim mtcs as ModelTableColumns
Set mtcs = ActiveWorkbook.Model.ModelTables(1).ModelTableColumns
For Each
Aqui está um exemplo de processamento dos itens ModelTableColumns em uma coleção.
Dim mtc As ModelTableColumn
For Each mtc In ActiveWorkbook.Model.ModelRelationships.ModelTableColumns
Next mtc
Count
Retorna um valor Long que representa o número de objetos ModelTableColumn em um objeto ModelTableColumns . Somente leitura.
Dim lngCount As Long
lngCount = ActiveWorkbook.Model.ModelTables(1).ModelTableColumns.Count
Item
Retorna um objeto ModelTableColumn da coleção ModelTableColumns .
Item (Index)
Index: O número de índice do objeto.
Dim mtc As ModelTableColumn
Set mtc = ActiveWorkbook.Model.ModelTables(1).ModelTableColumns(Index:=1)