Как с помощью макроса узнать, сколько таблиц в документе?
Результат записывается в View - Immediate Window.
Этот код сообщает, сколько таблиц в основном тексте. Таблицы могут быть ещё в колонтитулах и возможно ещё в каких-нибудь областях, объектах.
Sub Macro()
Debug.Print ActiveDocument.Tables.Count
End Sub