Есть два решения:
- Традиционное - используется CAA интерфейс CATIDescendants
- "Лазанье" по дереву - используется связка CAA интерфейсов CATINavigateObject + CATINavigElement + CATNavigInstance
Результаты могут получиться
разные так как в первом случае используется информация прямо из документа, а во втором из текущего представления документа.
В VB\VBA второй способ недоступен, а первый превращается в извлечение элементов из соответствующей коллекции (используя метод
Item)
P.S.: Можно ещё глянуть
здесь