Удаление страничок - Microsoft Office Word

женя2010 · 25.07.2011, 12:27

Добрый день

Я сделал список с выпадающими вариантами(КАРУСЕЛЬ и КАМАЗ) ,через Элементы ActiveX - Поле со списком, теперь хочу что бы когда я выбрал допустим "КАРУСЕЛЬ", то в этом же документе удалились странички c № 12 по № 19 .

Код:

Selection.GoTo wdGoToPage, wdGoToAbsolute, 3 
ActiveDocument.Bookmarks("\Page").Range.Delete

такое помогает только с одной страницей....а мне нужно 30 удалять страниц с картинками, и оно ОЧЕНЬ Долго это делает)

Какой VBA код нужно прописать?

женя2010 · 26.07.2011, 10:13

блин, ЛЮДИ! очень горит....какой код на удаление страниц с 5 по 30? плизззззззззз

Sasha_Smirnov · 26.07.2011, 13:04

Окстись, такого кода нет (пока). Можно текст сделать белым.

Вообще лучше применить

Код:

Sub autoOpen()

Это позволит (заставить) сделать выбор ещё до открытия вашего коммерческого предложения.

(А ведь это будет ноу-хау! — до сих пор делали HTML — а не DOC.)

Казанский · 26.07.2011, 15:50

Удобно работать не со страницами, а с разделами - неважно, сколько в разделе страниц, он будет удаляться целиком. Попробуйте, лучше в режиме отображения непечатных знаков:

женя2010 · 26.07.2011, 17:23

Да действительно, с разделами лучше, Спасибо!

25.07.2011, 12:27	#1
женя2010 Пользователь Регистрация: 16.04.2010 Сообщений: 49	Удаление страничок Добрый день Я сделал список с выпадающими вариантами(КАРУСЕЛЬ и КАМАЗ) ,через Элементы ActiveX - Поле со списком, теперь хочу что бы когда я выбрал допустим "КАРУСЕЛЬ", то в этом же документе удалились странички c № 12 по № 19 . Код: `Selection.GoTo wdGoToPage, wdGoToAbsolute, 3 ActiveDocument.Bookmarks("\Page").Range.Delete` такое помогает только с одной страницей....а мне нужно 30 удалять страниц с картинками, и оно ОЧЕНЬ Долго это делает) Какой VBA код нужно прописать? Последний раз редактировалось женя2010; 25.07.2011 в 18:23.

26.07.2011, 13:04	#3
Sasha_Smirnov Особый статус Участник клуба Регистрация: 24.11.2008 Сообщений: 1,535	Окстись, такого кода нет (пока). Можно текст сделать белым. Вообще лучше применить Код: `Sub autoOpen()` Это позволит (заставить) сделать выбор ещё до открытия вашего коммерческого предложения. (А ведь это будет ноу-хау! — до сих пор делали HTML — а не DOC.) Формула 1 (календарь чемпионата-2016): 26.11.2016 15:55 — Абу-Даби: http://ru.wikipedia.org/wiki/Гран-при_Абу-Даби — (квалификация)! Эфир: http://lion-tv.com/28-match-tv.html

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Удаление	ala	Свободное общение	28	26.03.2021 15:44
Удаление	Bat{CMD}_Men	Общие вопросы Delphi	1	16.04.2010 17:49
Удаление RX	artemavd	БД в Delphi	1	14.06.2009 19:24

26.07.2011, 10:13	#2
женя2010 Пользователь Регистрация: 16.04.2010 Сообщений: 49	блин, ЛЮДИ! очень горит....какой код на удаление страниц с 5 по 30? плизззззззззз

26.07.2011, 17:23	#5
женя2010 Пользователь Регистрация: 16.04.2010 Сообщений: 49	Да действительно, с разделами лучше, Спасибо!