Как я могу перебирать только стили таблиц?

Question

У меня есть процедура, которая перебирает стили, доступные для документа:

Sub EnumerateStyles()
  For Each Style in ActiveDocument.Styles
    `some custom code`
  Next
End Sub

Мне не нужны все стили, а только те, которые применимы только к таблицам. Как я могу программно фильтровать стили?

Спасибо

Answer 1

Дох, наконец-то разобрался:

Стиль имеет свойство Type, для стилей, применимых к таблицам, это wdStyleTypeTable.