удаление неиспользуемых стилей

[caute]

стили, к которым Word добавляет слово "знак", кажется, возникают при создании сносок - в качестве подстиля знака сноски для данного стиля, но вот зачем эти "знаки" иногда записываются в нормал.дот, не очень ясно.
впрочем, не так уж это и важно

[Пименов Александр]

И еще по стилям, почему-то Wodовские программисты при создании надписей к объектам до сих пор не связывают их с объектом.......

[caute]

а можно вопрос не по теме (чтоб новую не создавать ради пустяка:
какой командой можно очистить форму поиска-замены в Word?
некоторые макросы оставляют после себя галку в подстановочных знаках и пр. ерунду, которую приходится каждый раз чистить вручную. Хотелось бы в конце макроса добавить команду, чтоб он за собой прибрался

[Вождь]

Сообщение от caute

...очистить форму поиска-замены в Word...

При открытии форма заполняется параметрами последнего поиска Selection. Сбросить галку подстановочного поиска можно так:

Dim D As Word.Dialog

    Set D = Application.Dialogs(Word.wdDialogEditReplace)
    With Selection.Find
        .ClearFormatting
        .Replacement.ClearFormatting        
        .MatchWildcards = False
        .Text = ""
        .Execute
    End With
    D.Update
    D.Show

Команда Dialog.Update обновляет диалог по поиску Selection. Для задания своих параметров можно использовать свойства диалога, например:
Application.Dialogs(Word.wdDialogEd itReplace).Find = ""
Application.Dialogs(Word.wdDialogEd itReplace).PatternMatch = 0 ' 1

[caute]

работает, спасибо