Нужна помощь: макрос MS Word...

[d824ser]

В общем задача стоит такая: http://wordexpert.ru/page/preobrazov...obychnyj-tekst

Сам я в этом как-то не рублю...
Может кто-нибудь объяснит как это осуществить? желательно пошагово

[Господин Директор]

Один из вариантов: ворд 2007 (2010):

1. Грузим документ
2. Переходим на вкладку "Разработчик"
3. Давим кнопку "Макросы"
4. Пишем в поле "Имя": fnToText
5. Смотрим, чтобы в поле "Макросы из" стояло "Активных шаблонов", если так - давим "Создать".
6. Копируем все из примера, не включая первую строку (Sub fnToText()) и последнюю (EndSub)
7. Вставляем код между уже созданными строками
8. Давим кнопочку Run (зеленый треугольник), либо закрываем окно VB, давим "Макросы", выбираем fnToText и давим "Выполнить".
9. Радуемся.

ЗЫ
Во всех остальных документах данный макрос можно выбрать и выполнить через "Разработчику->Макросы->выбрать из списка "fnToText"->кнопка "Выполнить".
Ну либо можно нацепить кнопку на этот макрос и вытащить ее на панель - по ее нажатию будет выполняться этот макрос.

[d824ser]

Judge, большое спасибо... буду пробовать. А для 2003 офиса такая схема подойдет? или нужен именно 2007-10?

[Господин Директор]

Да, подойдет, только вместо вкладки "Разработчик" лезть в меню "Сервис" (или как-то так, вообщем, "Макросы" найти нужно, остальное все по схеме).

[d824ser]

Спасибо