Ответ
 
Опции вопроса Поиск в этом вопросе Опции просмотра
  #1  
Старый 29.09.2011, 21:16
Аватар для Guest
Guest
Вопрос
Сообщений: n/a
По умолчанию

В макросе нужно удалить все пустые абзацы. Делаю так:Код: With oReplace .SearchString = "^$" .ReplaceString = "" End With oDoc.ReplaceAll(oReplace)НО: если в документе есть таблица с пустым абзацем в ячейке, то Офис зависает намертво! Это же происходит при попытке удаления всех пустых абзацев в тексте с таблицей и в стандартном диалоге поиска и замены.Если не ошибаюсь, то для oReplace надо задать атрибуты поиска и замены, чтобы проигнорировать поиск в Таблице:Кодim SrchAttributes(0) As New com.sun.star.beans.PropertyValueSrchAttr ibutes(0).Name = "XXX"SrchAttributes(0).Value = FalseoReplace.SetSearchAttributes(SrchAt tributes())Если это так, то что запивывать вместо XXX? Код:SrchAttributes(0).Name = "TextTable" не срабатывает - все равно офис зависает намертво, приходится убивать процесс.Подскажите, кто знает. Может есть другой способ либо игнорировать Таблицы в ЭТОМ поиске и замене, или же удалять пустые абзацы и в Таблице.Спасибо
Ответить с цитированием
Ответ

Опции вопроса Поиск в этом вопросе
Поиск в этом вопросе:

Расширенный поиск
Опции просмотра


Похожие вопросы
Тема Автор Раздел Ответов Последний вопрос или ответ
Вычисляемое поле в таблице ACCESS, создать вычисляемое поля в таблице аксес Guest Продолжение старого архива 0 30.09.2011 16:44
Зависание CALC при попытке заполнения формул. С чем может это быть связано? Guest Продолжение нового архива 0 29.09.2011 21:16
Savage 2 A Tortured Soul Зависание при попытке обновиться РЕШЕНО! Guest Новый архив 2 0 29.09.2011 09:25
Зависание ООо 2.2 pro при попытке печати Guest Продолжение нового архива 0 28.09.2011 07:43



2009-2015 © www.otvetnemail.ru - Форум вопросов и ответов.