ReSQL.ru
     
powered by simpleCommunicator - 2.0.58     © 2025 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Word2010: как правильно удалить абзац между таблицами?
15 сообщений из 15, страница 1 из 1
Word2010: как правильно удалить абзац между таблицами?
    #38179661
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shocker.Pro
Участник
Речь идет об удалении единственного абзаца, разделяющего таблицы. Образец файла приложен.

Вплоть до 2007 офиса работала такая конструкция:
Код: vbnet
1.
Thisdocument.Paragraphs(3).Range.Delete

она удаляла абзац, и таблицы "слипались"

В 2010 это не работает - удаляется только текст абзаца, но сам абзац остается.
Указание параметра
Код: vbnet
1.
thisdocument.Paragraphs(3).Range.Delete wdParagraph

приводит к ошибке "неверный параметр", причем в любой версии офиса.
...
Рейтинг: 0 / 0
11.03.2013, 12:30
| Ответить | Цитировать | Написать  
Word2010: как правильно удалить абзац между таблицами?
    #38179765
Фотография Akina
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Akina
Участник
Попробуйте выделить абзац, а затем его удалить.
В терминах 2003 Офиса это было бы
Код: vbnet
1.
2.
3.
    Selection.HomeKey Unit:=wdLine
    Selection.EndKey Unit:=wdLine, Extend:=wdExtend
    Selection.Delete Unit:=wdCharacter, Count:=1
...
Рейтинг: 0 / 0
11.03.2013, 13:14
| Ответить | Цитировать | Написать  
Word2010: как правильно удалить абзац между таблицами?
    #38179767
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shocker.Pro
Участник
то же самое
...
Рейтинг: 0 / 0
11.03.2013, 13:17
| Ответить | Цитировать | Написать  
Word2010: как правильно удалить абзац между таблицами?
    #38179768
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shocker.Pro
Участник
Shocker.Proто же самоене, ну понятно, что можно поставить туда курсор и потом удалить один символ, но во-первых это бред, во-вторых несовместимо с предыдущими версиями офиса (проверясть версию, делать разный код, думать о совместимости с будущими версиями - тоже бред какой-то)
...
Рейтинг: 0 / 0
11.03.2013, 13:18
| Ответить | Цитировать | Написать  
Word2010: как правильно удалить абзац между таблицами?
    #38179836
Фотография Akina
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Akina
Участник
Shocker.ProShocker.Proто же самоене, ну понятно, что можно поставить туда курсор и потом удалить один символТо есть даже не пробовал...
...
Рейтинг: 0 / 0
11.03.2013, 14:01
| Ответить | Цитировать | Написать  
Word2010: как правильно удалить абзац между таблицами?
    #38179873
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shocker.Pro
Участник
Твой код не работает в 2010.

Через запись макроса я вижу, что можно сначала почистить абзац, а потом удалить один символ (фактически символ абзаца), просто решение это некрасивое (см. выше), хотя придется это сделать, если не будет нормального выхода.
...
Рейтинг: 0 / 0
11.03.2013, 14:19
| Ответить | Цитировать | Написать  
Word2010: как правильно удалить абзац между таблицами?
    #38179882
Фотография ПЕНСИОНЕРКА
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ПЕНСИОНЕРКА
Участник
Shocker.Pro,
Код: vbnet
1.
2.
3.
4.
5.
Debug.Print Word.ActiveDocument.Paragraphs.Count
Debug.Print "="; Word.ActiveDocument.Paragraphs(7).Range.Text

Word.ActiveDocument.Paragraphs(3).Range.Select
Selection.Delete
...
Рейтинг: 0 / 0
11.03.2013, 14:21
| Ответить | Цитировать | Написать  
Word2010: как правильно удалить абзац между таблицами?
    #38179888
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shocker.Pro
Участник
ПЕНСИОНЕРКА, и это не удаляет в 2010
...
Рейтинг: 0 / 0
11.03.2013, 14:23
| Ответить | Цитировать | Написать  
Word2010: как правильно удалить абзац между таблицами?
    #38179957
Фотография Сын вождя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Сын вождя
Участник
В Ворд 2010 вставили предохранитель - параграф между таблицами удаляется, только если он пустой, иняче - очищается. Надо просто повторить удаление:
Код: vbnet
1.
2.
3.
4.
5.
6.
Dim R As Range

    Set R = ThisDocument.Tables(1).Range.Next
    R.Expand wdParagraph
    R.Delete
    R.Delete
...
Рейтинг: 0 / 0
11.03.2013, 15:00
| Ответить | Цитировать | Написать  
Word2010: как правильно удалить абзац между таблицами?
    #38179971
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shocker.Pro
Участник
Сын вождяНадо просто повторить удаление:в том-то и дело, что это приведет удалению лишнего в предыдущих версиях офиса


 
Сын вождявставили предохранитель
ну вообще классно, от чего он предохраняет то (тем более такой ценой - лишением совместимости с предыдущими версиями...)
...
Рейтинг: 0 / 0
11.03.2013, 15:08
| Ответить | Цитировать | Написать  
Word2010: как правильно удалить абзац между таблицами?
    #38180280
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shocker.Pro
Участник
Вот такое извращение пока придумал, работающее и в старой и в новой версиях:

Код: vbnet
1.
2.
3.
k.SetRange k.Start, k.End - 1
k.Delete
k.Delete
...
Рейтинг: 0 / 0
11.03.2013, 18:18
| Ответить | Цитировать | Написать  
Word2010: как правильно удалить абзац между таблицами?
    #38180332
Фотография Akina
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Akina
Участник
Shocker.ProВот такое извращение пока придумал, работающее и в старой и в новой версиях:
Вне зависимости от того, пуст параграф или нет, стоИт вставка или замена? ну тогда и нормально... никто ж не виноват, что в поведение объектов вносятся изменения...
...
Рейтинг: 0 / 0
11.03.2013, 18:49
| Ответить | Цитировать | Написать  
Word2010: как правильно удалить абзац между таблицами?
    #38180334
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shocker.Pro
Участник
Параграф не может быть пустым по определению в моем случае, так что все окAkinaВне зависимости от того, пуст параграф или нет
...
Рейтинг: 0 / 0
11.03.2013, 18:51
| Ответить | Цитировать | Написать  
Word2010: как правильно удалить абзац между таблицами?
    #38180344
Фотография Akina
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Akina
Участник
А я бы для подстраховки туда бы предварительно пробельчик воткнул... мало ли как жисть сложится...
...
Рейтинг: 0 / 0
11.03.2013, 18:57
| Ответить | Цитировать | Написать  
Word2010: как правильно удалить абзац между таблицами?
    #38180356
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shocker.Pro
Участник
AkinaА я бы для подстраховки туда бы предварительно пробельчик воткнул... мало ли как жисть сложится...Нужный абзац ищется Find-ом по контексту, он по определению не может быть пустым )))
...
Рейтинг: 0 / 0
11.03.2013, 19:06
| Ответить | Цитировать | Написать  
15 сообщений из 15, страница 1 из 1
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Word2010: как правильно удалить абзац между таблицами?
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
NoSQL.ru       Новости, Чат       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=61&msg=38180344&tid=2174954]:
 0ms
get settings:
 11ms
get forum list:
 14ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 49ms
get topic data:
 11ms
get forum data:
 3ms
get page messages:
 47ms
get tp. blocked users:
 1ms
others: 16ms
total:  158ms
созд. / загр.: 158ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]