Experts, the code below really explains what i want to do. I could use:
For i AS integer = 1 to oTable.columns.count
But I would really prefer to use the for each loop. Is this possible?
Can you show me how to make it work?
Dim oWord AS New Word.Application
Dim oDoc as Word.Document = oWord.Documents.Add
Dim oTable as Word.Table
oTable = oDoc.tables.Add(oWord.selection.range, rowCount, columnCount)
For Each orow As Word.Row In oTable.Rows
For Each oColumn As Word.Column In oTable.Rows(oRow.Index)
'do column stuff