Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Word2010: как правильно удалить абзац между таблицами? / 15 сообщений из 15, страница 1 из 1
11.03.2013, 12:30
    #38179661
Shocker.Pro
Shocker.Pro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Word2010: как правильно удалить абзац между таблицами?
Речь идет об удалении единственного абзаца, разделяющего таблицы. Образец файла приложен.

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

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

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

приводит к ошибке "неверный параметр", причем в любой версии офиса.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
11.03.2013, 13:14
    #38179765
Akina
Akina
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Word2010: как правильно удалить абзац между таблицами?
Попробуйте выделить абзац, а затем его удалить.
В терминах 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:17
    #38179767
Shocker.Pro
Shocker.Pro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Word2010: как правильно удалить абзац между таблицами?
то же самое
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
11.03.2013, 13:18
    #38179768
Shocker.Pro
Shocker.Pro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Word2010: как правильно удалить абзац между таблицами?
Shocker.Proто же самоене, ну понятно, что можно поставить туда курсор и потом удалить один символ, но во-первых это бред, во-вторых несовместимо с предыдущими версиями офиса (проверясть версию, делать разный код, думать о совместимости с будущими версиями - тоже бред какой-то)
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
11.03.2013, 14:01
    #38179836
Akina
Akina
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Word2010: как правильно удалить абзац между таблицами?
Shocker.ProShocker.Proто же самоене, ну понятно, что можно поставить туда курсор и потом удалить один символТо есть даже не пробовал...
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
11.03.2013, 14:19
    #38179873
Shocker.Pro
Shocker.Pro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Word2010: как правильно удалить абзац между таблицами?
Твой код не работает в 2010.

Через запись макроса я вижу, что можно сначала почистить абзац, а потом удалить один символ (фактически символ абзаца), просто решение это некрасивое (см. выше), хотя придется это сделать, если не будет нормального выхода.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
11.03.2013, 14:21
    #38179882
ПЕНСИОНЕРКА
ПЕНСИОНЕРКА
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Word2010: как правильно удалить абзац между таблицами?
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:23
    #38179888
Shocker.Pro
Shocker.Pro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Word2010: как правильно удалить абзац между таблицами?
ПЕНСИОНЕРКА, и это не удаляет в 2010
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
11.03.2013, 15:00
    #38179957
Сын вождя
Сын вождя
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Word2010: как правильно удалить абзац между таблицами?
В Ворд 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:08
    #38179971
Shocker.Pro
Shocker.Pro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Word2010: как правильно удалить абзац между таблицами?
Сын вождяНадо просто повторить удаление:в том-то и дело, что это приведет удалению лишнего в предыдущих версиях офиса


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

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


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