popkov
Advanced Member | Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору Этот макрос удаляет коды полей типа ADDIN, расположенных: в основном тексте (в т.ч. рамках и таблицах), сносках (концевых и внизу страницы), надписях и сгруппированных надписях (расположенных на полотне или вне его). Вот получившийся код: Я совсем новичок в VBA, поэтому буду очень признателен за замечания о возможных багах. Если можно сделать проще - буду рад услышать, как? Вообще, общая цель - чтобы все поля EndNote, которые можно добавить в документ, где бы они ни были, правильно обрабатывались (удалялись коды полей)! Перед выполнением должен быть запрос подтверждения. И ещё бы хотелось, чтобы автоматически выставлялся правильный язык для текста, в который превращаются поля (EndNote по умолчанию для всех полей выставляет язык:Английский). После удаления кодов полей данным макросом язык большинства русских слов меняется на руссский, но, почему-то, не у всех слов (хотя у большинства). Данный макрос удаляет коды всех полей типа ADDIN. Такие поля я пока встречал только у EndNote, но для надёжности неплохо бы ввести проверку на соответствие: поля EndNote начинаются с Цитата: и (только одно поле в документе - сам автоматически генерируемы список литературы) с Цитата:. Можно ли как-то сделать проверку? | Всего записей: 1833 | Зарегистр. 22-03-2003 | Отправлено: 12:30 05-05-2007 | Исправлено: popkov, 02:29 07-05-2007 |
|