VBA

[Сабико]

Не уверена, что вопрос дотягивает до тематики сообщества, но очень уж любопытно.



В Ворде в "стилях и форматировании" наряду со списками всех и доступных стилей, можно лицезреть списки использованного и доступного форматирования.

Можно ли их как-то выудить в макросе?



Справку VBA под word вроде всю облазила, ничего не нашла ><

Нашлось только Style.InUse (хотя и оно даёт не всегда только действительно использованные), но по-хорошему мне нужны не только стили, но и все основанные на них форматирования.

Неужели только идти по всем параграфам... или, оужас, вообще чарактерам?! Даёт же сам ворд номальный список форматирований, не составляет же он его каждый раз?

Comments

[sese]

не уверен, что поможет, но есть такая замечательная штука как макрорекордер. Вы запускаете его, выполняете некие интересные вам действия, а потом останавливаете макрорекордер и смотрите, что он там написал. Сам в свое время в основном так и учился. Увы, для "ворда" ничего не писал.

[orangeudav]

открыл справку и вот что нашел (word2003)



ActiveDocument.Styles As Styles

Styles -> это коллекция объяектов Style

см "Styles Collection Object"



там даже пример приведен как пройтись по всем стилям документа



For Each sty In ActiveDocument.Styles

If sty.BuiltIn = False Then sty.Delete

Next sty

[Сабико]

Дык это только сами стили, я про них сказала, конечно они есть.

Чуете разницу между заданным стилем и ручным форматированием?



Ладно, вообщем, уже сделала с посимвольной проверкой сторонних форматирований в параграфе, тормозит, конечно, но и то хлеб ><

Чёрт, ненавижу дядю Билли.