1c word заменить текст
Объект Find является членом объектов Selection и Range, каждый из которых можно использовать для поиска текста в документах Microsoft Office Word. Команда замены является расширением команды поиска.
С помощью объекта Find можно выполнять операцию перебора документа Microsoft Office Word и поиска конкретного текста, форматирования или стиля, а свойство Replacement можно использовать для замены всех найденных элементов.
Применимо к: Сведения в этом разделе относятся к - проектам уровня документа и добавлению VSTO - в проектах для Word. Дополнительные сведения см. в разделе доступность функций по типам приложений Office и проектов.
Использование объекта Selection
При использовании объекта Selection для поиска текста все заданные условия применяются только для поиска текущего выделенного текста. Если точкой вставки является Selection, то поиск выполняется по документу. Если будет найден элемент, соответствующий условиям поиска, он будет автоматически выделен.
Следует отметить, что условия Find являются накопительными. Это означает, что условия добавляются к предыдущим условиям поиска. Для сброса форматирования из предыдущих операций поиска перед выполнением нового поиска используйте метод ClearFormatting.
Поиск текста с помощью объекта Selection
Назначьте переменной строку поиска.
Сбросьте форматирование из предыдущих операций поиска.
В следующем примере показан полный метод.
Использование объекта Range
Объект Range позволяет искать текст, ничего не отображая в пользовательском интерфейсе. FindОбъект возвращает значение true , если найден текст, соответствующий условиям поиска, и false , если это не так. Он также переопределяет объект Range, чтобы он соответствовал условиям поиска при обнаружении текста.
Поиск текста с помощью объекта Range
Определите объект Range, состоящий из второго абзаца в документе.
Следующий пример кода можно использовать в настройке на уровне документа.
Следующий пример кода можно использовать в надстройке VSTO. В этом примере используется активный документ.
С помощью Find свойства Range объекта сначала очистите все существующие параметры форматирования, а затем найдите строку Find Me.
Если поиск заканчивается неудачно, выбирается второй абзац. При успешном выполнении поиска отображаются условия поиска.
В следующем примере показан полный код для настройки на уровне документа. Чтобы использовать этот пример, запустите код из класса ThisDocument в своем проекте.
В следующем примере показан полный код для надстройки VSTO. Чтобы использовать этот пример, запустите код из класса ThisAddIn в своем проекте.
Поиск и замена текста в документах
Следующий код выполняет поиск в текущем выделенном фрагменте и заменяет все вхождения строки Find Me найденной строкой.
Поиск и замена текста в документах
Добавьте следующий пример кода в класс ThisDocument или ThisAddIn в своем проекте.
Класс Find имеет метод ClearFormatting, а класс Replacement также имеет свой собственный метод ClearFormatting. При выполнении операций Find-and-Replace необходимо использовать метод Клеарформаттинг обоих объектов. Если его использовать только на объекте Find, то при замене текста можно получить непредвиденные результаты.
Для замены каждого найденного элемента используйте метод Execute объекта Find. Чтобы указать, какие элементы следует заменить, используйте параметр Replace . Этот параметр может принимать одно из следующих значений WdReplace:
Вчера вечером наткнулась: у меня надпись + линии (для красоты). Так вот, если надпись с линиями сгруппирована - не работает, а как разгруппируешь - все о`кей.
Может еще у кого какие проблемы вылезли - делитесь :)
// рисуем колонтитулы
//вЕРХНИЕ
Fnd2 = Word.ActiveDocument.Sections(1).Headers(1).Range().Find;
Fnd2.ClearFormatting();
Fnd2.Forward = -1;
// Номер договора
поле="";лЗначение=ПолучитьНомерДоговораДляПечати();
Если Fnd2.Execute(СокрЛП(лПоле). СокрЛП(лЗначение),2)=-1 Тогда КонецЕсли;
//дата договора
лполе="";лЗначение=формат(Объект.Дата,"ДЛФ=DD");
Если Fnd2.Execute(СокрЛП(лПоле). СокрЛП(лЗначение),2)=-1 Тогда КонецЕсли;
//Нинжние
Fnd3= Word.ActiveDocument.Sections(1).Footers(1).Range().Find;
//аналагична
Пожалуйста!
Все, что в [] заменяется программно. Наши реквизиты подставляются в сам шаблон и сохраняются.
Спасибо. Случайно не в курсе как можно подобным образом сделать табличку с изменяемым количеством строк?
Просмотры 18267
Загрузки 0
Рейтинг 27
Создание 06.12.10 13:18
Обновление 06.12.10 13:18
№ Публикации 79089
Тип файла Нет файла
Конфигурация Конфигурации 1cv7
Операционная система Windows
Вид учета Не имеет значения
Доступ к файлу Бесплатно (free)
Код открыт Не указано
Главное отличие онлайн-тренажера - отработка теории в группах с последующим разбором, сразу, никаких автовебинаров.
См. также
1С 7.7 и новый 1С:Контрагент
Получение реквизитов контрагентов из 1С:Контрагент для старых конфигураций под 1с 7.7.
25.04.2022 364 zhenyat 1
Печать таблицы значений в 1С 7.7 при отладке
Функция выводит таблицу значений в табличный документ. (v7.7) Особенно полезно при отладке. Не нужно вносить изменения в код, вызываем функцию как вычисляемое выражение при останове. Если таблица обрабатывается в несколько этапов, можно вывести её после каждого и визуально проследить эволюцию.
30.06.2021 2047 Zoltan_Black 11
Заполнение реквизитов документов из предыдущего документа
Функция для автоматического заполнения реквизитов документов.
04.02.2019 5853 drevilo 2
Проверка часового пояса
При использовании терминалок для удаленных баз, иногда при входе в базу данных необходимо исключить возможность входа пользователей с компьютеров с другим часовым поясом. Например, работают в Новосибирской базе с временем UTC +6 и пытаются зайти в базу с UTC +3.
16.05.2016 11823 kudenzov 3
Процедура расшифровки ячейки таблицы в отчетах 1С 7.7
Хочу поделиться с вами универсальной процедурой для расшифровки ячеек печатной формы отчетов в 1С 7.7.
24.09.2015 19342 Anzhey 14
Универсальный способ сравнения таблиц
На эту тему уже есть статьи, но этот способ нигде не описан. Хотя я его использую с тех пор, как занимаюсь программированием. Его преимущество в простоте и универсальности: можно применять на 1С, SQL, а также в любом другом языке программирования.
05.07.2015 20172 json 3
Числа прописью в родительном падеже в 7.7? Легко!
Вывод числительных прописью в родительном падеже штатными средствами в три строчки кода.
20.06.2015 13490 gimalaj 3
Исправление в типовой комплексной конфигурации глобальной функции глВсеРеквизитыДокументаЗаполнены()
В типовых конфигурациях глобальная функция глВсеРеквизитыДокументаЗаполнены() не работает с реквизитами табличной части. Данная статья содержит текст исправленной функции, корректно проверяющей табличную часть.
20.08.2014 8380 hvv2002 0
Проверка ИНН v.7.7
Проверка ИНН, есть наверняка куча аналогов, для v.8.x точно есть и не один.
08.03.2014 9945 kras_71 0
Полезные функции. Склонение (должность и фамилия подписантов). Любой язык
Уехал директор в командировку, отпуск. , оставил доверенность на хозяйственные операции на другого сотрудника. Все договора и другие документы в обмороке - "подписант" теперь другой, по тексту тоже много правок. Пересмотрел много публикаций, вариантов много, не приглянулось. Сделал свой "Баян" . У меня всего-то крутится пять фигурантов . Нет простого, наглядного и всепогодного варианта без языкового барьера. Всем процессом управляет пользователь.
03.03.2014 18571 kompas-dm 5
Устранение проблемы при работе с полем, которое ограничено маской ввода
Для поля, у которого установлена маска ввода, перед программной инициализацией необходимо начальное значение преобразовать к значению в соответствии с маской, иначе буду потеряны символы в местах разделителях. В данной публикации приведена функция, которая универсально выполняет данное действие.
08.08.2012 17323 www2000 4
Скрытие помеченных на удаление в справочнике
Корректно скрываем помеченных на удаление в справочнике, с иерархией и без. Вроде простая и нужная вещь, но почему-то нигде не встречалась
08.08.2012 15007 mikukrnet 7
Исправление и проведение документов
Исправление и проведение документов, например, счетов-фактур, введенных на основании документов реализации, можно организовать многими способами. Описан сравнительно простой подход, реализованный и работающий несколько лет в реальной бухгалтерии 1Cv7.7. Без внешних компонентов.
23.07.2012 13775 BorisBelov 11
Получение характеристик и управление текущим процессом 1С на основе WMI
Функционал для работы из 1С с текущим процессом класса Win32_Process. Пример получает текущее значение ОЗУ занятое процессом 1С. По описанной методике можно получать значения пиковых нагрузок на ОЗУ, время запуска текущей сессии 1С с точностью до миллисекунд. Определять загрузку активного ядра процессом и даже поменять приоритет самого процесса.
09.07.2012 21931 dusha0020 8
Доработка ТиС 9.2 на предмет запрета одинаковых (дублей) артикулов
Проверка уникальности артикула
03.07.2012 11365 atb123 11
Функция проверки валидности e-mail с использованием регулярных выражений RegExp (7.7)
Функция проверки валидности e-mail с использованием регулярных выражений RegExp (7.7). Данную функцию можно вставить в Глобальный модуль и пользоваться, например, при вводе или сохранении e-mail.
30.10.2011 11502 zaursoft 11
Неправильное изменение категории плательщика ПФР при проведении справки МСЭК
В ЗиК (релиз 314) при проведении документа "Справка МСЭК" вкралась ошибка: проведение некорректно изменяет категорию плательщика ПФР на "Работник сельскохозяйственной организации - инвалид", затем на "Работник колхоза, совхоза и другого сельскохозяйственного предприятия". Связано это с разными типами ожидаемого и возвращаемого перечисления в функции "глКатегорияПФР": "КатегорияПлательщикаПФ" и "КатегорииЗастрахованныхЛицПФР". Решение: изменить функцию "глКатегорияПФР" (около 2932-й строки).
17.10.2011 6600 Krokokot 3
Хитрость. Использование БУЛЕВО при OLE обмене/подключении из 7.7 к 8
Как известно, при OLE обмене доступны только типы СТРОКА, ЧИСЛО, ДАТА. А вот БУЛЕВО (ИСТИНА, ЛОЖЬ) использовать при подключении из 7.7 к 8 не получается. Как же быть? Есть хитрость, как использовать тип булево в семерке при обмене с 1С8! :)
28.09.2011 17348 dnikolaev 8
Дата запрета редактирования
Очень часто необходимо постоянно закрывать период для редактирования документов. Вот как я вышла из этой ситуации.
Текст [V1] находится в таблице, которая находится в автофигуре.
Почему-то текст не заменяется, хотя вне автофигуры все отрабатывает нормально.
Ответ:
Примерный код такой:
Код 1C v 8.х
Похожие FAQ
Еще в этой же категории
Как в excel сохраненный из 1С вставить новый лист? 15
Я думаю, все сталкивались с однолистовым excel файлом из 1С, у которого на первый взгляд, нет возможности добавить листы. Все не так страшно - их просто скрыли или, что чаще всего - даже не отображали (обусловлено созданием файла из стороннего прил Как сформировать документ в Word из 1С? (Active Document) 14
ВНИМАНИЕ! При использовании кодов описанных ниже, уберите символ _ Давайте рассмотрим на примерах как это делается! =) Мне известно 2 способа: 1. Путем замены шаблонного текста в макете Wordа. 2. Путем вставки текста с помощью закладок в Wo Преобразование XLS в MXL 10
Конвертация таблиц из Excel в MXL - скачать Converter Excel v MXL: Для 8.х - Для 7.7 - // Выбор файла Microsoft Excel Procedure FileNameStartChoice(Element, StdProcessing) StdProcessing = False; DialogFile = New FileDialog(FileDialogMode. Универсальная функция для чтения данных из Excel в 1С 3
Иногда требуется разобрать данные из Excel в 1С. Я считаю что легче и быстрей поместить все данные в ТаблицуЗначений и уже там ими манипулировать. Пример 2-х функций которые я использую: ИзExcelВТаблицу – Читает Excel в ТаблицуЗначений ЭлементСп Пример работы с общим макетом типа ActiveDocument в клиент-серверном варианте 3
//********************************************************************************** //получаем макет на сервере, сохраняем в файл и передаем на клиента НаСервере Функция ПолучитьДанныеМакета() АдресХранилища = Новый УникальныйИдентификатор Посмотреть все в категории Работа с Microsoft Office и OpenOffice
Перейдите на главная >Заменить или нажмите CTRL+H.
В поле Найти введите искомое слово или фразу.
В поле Заменить введите новый текст.
Нажимайте кнопку Найти далее, пока не перейдете к слову, которое нужно изменить.
Чтобы найти только вхождения в верхнем или нижнем регистре, нажмите кнопку Больше и установите флажок Учитывать регистр.
Дополнительные параметры см. в статье Поиск и замена текста.
Поиск и замена обычного текста
В правом верхнем углу документа в поле поиска введите нужное слово или фразу, и Word выделит все в экземпляры слова или фразы во всем документе.
Чтобы заменить найденный текст:
Щелкните значок увеличительного стекла и нажмите кнопку Заменить.
Введите замещающий текст в поле Заменить на.
Нажмите Заменить все или Заменить.
Вы также можете открыть область Найти и заменить, нажав клавиши CONTROL+H.
При замене текста рекомендуется нажимать Заменить, а не Заменить все. Таким образом можно проверить каждый элемент перед заменой.
С помощью меню Формат вы можете найти текст с определенным форматированием, таким как полужирный шрифт или выделение.
Выберите Вид > Область навигации.
В области навигации щелкните значок увеличительного стекла.
Щелкните стрелку в нижней части диалогового окна Найти и заменить, чтобы отобразить все параметры.
В меню Формат выберите нужный параметр.
Если откроется второе диалоговое окно, выберите нужные параметры и нажмите кнопку ОК.
В диалоговом окне Поиск и замена нажмите кнопку Найти далее или Найти все.
С помощью меню Формат вы можете найти и заменить текст с определенным форматированием, таким как полужирный шрифт или выделение.
Выберите Вид > Область навигации.
В области навигации щелкните значок увеличительного стекла.
В верхней части диалогового окна нажмите кнопку Заменить.
Щелкните стрелку в нижней части диалогового окна Найти и заменить, чтобы отобразить все параметры.
В поле Найти введите текст, который хотите найти.
В меню Формат выберите нужный вариант форматирования.
Если откроется второе диалоговое окно, выберите нужные параметры и нажмите кнопку ОК.
Щелкните в поле Заменить на.
В меню Формат выберите замещающее форматирование. Если появится второе диалоговое окно, выберите нужные форматы и нажмите кнопку ОК.
Нажмите Заменить, Заменить все или Найти далее.
Выберите Вид > Область навигации.
В области навигации щелкните значок увеличительного стекла.
Щелкните стрелку в нижней части диалогового окна Найти и заменить, чтобы отобразить все параметры.
В меню Специальный выберите нужный специальный знак.
Выберите Вид > Область навигации.
В области навигации щелкните значок увеличительного стекла.
Щелкните стрелку в нижней части диалогового окна Найти и заменить, чтобы отобразить все параметры.
В верхней части диалогового окна Найти и заменить выберите Заменить, а затем выберите в поле Найти, но не введите ничего. После этого при выборе специального знака Word автоматически поместит код знака в соответствующее поле.
В меню Специальный выберите нужный специальный знак.
Щелкните в поле Заменить на.
В меню Специальный выберите специальный знак, который нужно использовать для замены.
Выберите Вид > Область навигации.
В области навигации щелкните значок увеличительного стекла.
Установите флажок Подстановочные знаки.
Если флажок Подстановочные знаки недоступен, нажмите .
В меню Специальный выберите подстановочный знак и введите любой дополнительный текст в поле Найти.
Чтобы остановить поиск, нажмите клавиши +ТОЧКА.
Вы также можете ввести подстановочный знак непосредственно в поле Найти поле, вместо выбора элемента из всплывающего меню Специальные.
Чтобы найти символ, который определен как подстановочный знак, введите косую черту (\) перед искомым символом. Например, введите \?, чтобы найти вопросительный знак.
Для группировки подстановочных знаков и текста, а также для указания порядка обработки знаков следует использовать круглые скобки. Например, чтобы найти слова "призвание" и "приключение", введите .
Для поиска выражения и последующего изменения порядка его компонентов используйте подстановочный знак \n. Например, введите (Селезнев) (Глеб) в поле Найти и \2 \1 в поле Заменить на, чтобы найти словосочетание "Селезнев Глеб" и заменить его на "Глеб Селезнев".
Чтобы заменить найденный текст:
Откройте вкладку Заменить и выберите поле Заменить на.
Во всплывающем меню Специальный выберите подстановочный знак и введите любой дополнительный текст в поле Заменить на.
Нажмите Заменить все, Заменить или Найти далее.
Совет: При замене текста рекомендуется нажимать Заменить, а не Заменить все. Это позволить проверить каждый из элементов и убедиться в правильности замены.
Поиск можно уточнить с помощью любого из следующих подстановочных знаков.
Чтобы найти
Используйте
Выражение к?т позволяет найти слова "кот" и "кит".
Любая строка символов
Выражение п?л позволяет найти слова "пол" и "пошел".
Один из указанных символов
Выражение кр[еа]н позволяет найти слова "крен" и "кран".
Любой символ из указанного диапазона
Выражение [б-м]ой позволяет найти слова "бой", "вой" и "мой".
Диапазон должен быть в алфавитном порядке.
Любой символ, кроме символов, указанных в скобках
Выражение по[!р]ол позволяет найти слова "посол" и "помол", но не "порол".
Любой символ, кроме символов, которые находятся в диапазоне, указанном в скобках
Выражение к[!е-р]а позволяет найти слова "кода" и "коса", но не слова "кожа" и "кора".
Диапазон должен быть в алфавитном порядке.
Ровно n появлений символа или выражения подряд в тексте
Выражение жареный позволяет найти слово "жаренный", но не слово "жареный".
Как минимум n появлений символа или выражения подряд в тексте
Выражение жареный позволяет найти слова "жареный" и "жаренный".
Диапазон появлений символа или выражения подряд в тексте
Выражение 10 позволяет найти числа "10," "100," и "1000".
Любое, однократное или повторяющееся, появление символа или выражения в тексте
Выражение больше@ позволяет найти слова "больше" и "большее".
Выражение (ель)> позволяет найти слова "ель" и "шрапнель", но не слово "ельник".
Word в Интернете позволяет искать и заменять обычный текст. Вы можете использовать параметры "Учитывать регистр" или "Только слово целиком". Чтобы использовать другие параметры, откройте документ в классическом приложении Word.
Некоторые сведения относятся к предварительной версии продукта, в которую до выпуска могут быть внесены существенные изменения. Майкрософт не предоставляет никаких гарантий, явных или подразумеваемых, относительно приведенных здесь сведений.
Выполняет указанную операцию поиска.
Параметры
Необязательный объект. Искомый текст. Используйте пустую строку ("") для поиска только форматирования. Вы можете выполнить поиск специальных символов, указав соответствующие коды знаков. Например, "^ p" соответствует знаку абзаца, а "^ t" соответствует символу табуляции.
Необязательный объект. Значение true , чтобы указать, что при поиске текста учитывается регистр. Соответствует установленному флажку "Учитывать регистр" в диалоговом окне "Найти и заменить".
Необязательный объект. Значение true для поиска только целых слов, а не текста, который является частью большего слова. Соответствует установленному флажку "Только слово целиком" в диалоговом окне "Найти и заменить".
Необязательный объект. Значение true , если искомый текст является особым оператором поиска. Соответствует установленному флажку "Подстановочные знаки" в диалоговом окне "Найти и заменить".
Необязательный объект. Значение true для поиска слов, которые похожи на поиск текста. Соответствует флажку "звуки, например" в диалоговом окне "найти и заменить".
Необязательный объект. Значение true для того, чтобы операция поиска обнаружила все формы искомого текста (например, "Sit" размещает "" где "и" Кот "). Соответствует флажку "найти все Word Forms" в диалоговом окне "найти и заменить".
Необязательный объект. Значение true для поиска вперед (в направлении конца документа).
Необязательный объект. Значение true для того, чтобы операция поиска обнаружила форматирование в дополнение к или вместо поиска текста.
Необязательный объект. Замещающий текст. Чтобы удалить текст Find , указанный аргументом, используйте пустую строку (""). Специальные символы и условия расширенного поиска задаются так же, как и для Find аргумента. Чтобы указать в качестве замены графический объект или другой не текстовый элемент, переместите его в буфер обмена и укажите "^ c" для ReplaceWith .
Необязательный объект. Указывает, какое количество замен должно выполняться: один, все или нет. Может быть любой WdReplace константой:вдреплацеалл вдреплаценоне вдреплацеоне
Необязательный объект. Имеет значение true , если поисковые операции с совпадающим значением кашиды в документе для арабского языка совпадают. Этот аргумент может быть недоступен в зависимости от того, какая языковая поддержка (например, английский) выбрана или установлена.
Необязательный объект. Имеет значение true , если поисковые операции для поиска совпадают с диакритическими знаками в документе для языков с письмом справа налево. Этот аргумент может быть недоступен в зависимости от того, какая языковая поддержка (например, английский) выбрана или установлена.
Необязательный объект. Имеет значение true , если поисковые операции выводятся с соответствующими алиф гамза в документе на арабском языке. Этот аргумент может быть недоступен в зависимости от того, какая языковая поддержка (например, английский) выбрана или установлена.
Необязательный объект. True , если поиск выполняется в тексте с соответствующими двунаправленными контрольными символами в документе для языков с письмом справа налево. Этот аргумент может быть недоступен в зависимости от того, какая языковая поддержка (например, английский) выбрана или установлена.
Возвращаемое значение
Комментарии
Этот метод возвращает значение true , если операция поиска выполнена успешно.
Если MatchWildcards имеет значение true, вы можете указать подстановочные знаки и другие расширенные условия поиска для FindText аргумента. Например, "* ([]") находит все слова, заканчивающиеся на "применять".
Чтобы найти символьный символ, введите символ "крышка" (^), ноль (0), а затем код символа. Например, "^ 0151" соответствует длинному тире (—).
Если не указано иное, замещающий текст наследует форматирование текста, который он заменяет в документе. Например, если заменить строку "ABC" на "XYZ", то все вхождения "ABC" с форматированием полужирным шрифтом заменяются на строку "XYZ" полужирным шрифтом.
Кроме того, если MatchCase задано значение false, то вхождения искомого текста в верхнем регистре заменяются заглавной версией замещающего текста независимо от регистра текста для поиска и замены. В предыдущем примере вхождения "ABC" заменяются на "XYZ".
Читайте также: