Поиск  Пользователи  Правила  Войти
Форумы "Планета Excel" » Вопросы по Microsoft Excel
Страницы: 1
RSS
Удаление выборочных страниц из документа Word макросом из Excel
 
#1
28.12.2016 04:35:06
Доброе время суток! Второй день ищу решение банальной проблемы. Не могу макросом из Excel удалить выборочно страницы из сформованного документа в формате docx (Word). Предлагаемые решения работают или макросом из самого Word, или не работают вовсе. Есть варианты удаления по Bookmarks("/Page") и указания конкретного номера страницы. Не работает (( удаляет не указанную страницу, а первую. Если нужны подробности покажу куски трестируемого кода. Может у кого есть фрагмент работающей строки (строк). Заранее благодарен!
Изменено: maryan - 28.12.2016 04:36:06
 
 
 
#2
28.12.2016 10:24:53
Цитата
maryan написал:
Если нужны подробности покажу куски трестируемого кода
Не куски кода, а весь код. В файле.
Если код работает в Word, но не работает в Excel - проблема в Selection и/или в константах Ворда. Поставьте Option Explicit в начале модуля, попробуйте скомпилировать.
 
 
 
#3
29.12.2016 05:11:51
Спасибо за оперативный ответ. Ниже весь код в файле, который пытался запустить сегодня.
В архиве 2 файла (таблица с макросом и вымышленный шаблон для формирования документа Word).
Описание на первом листе файла xlsm. Трабла в силе. Прошу помощи. Заранее благодарен!
 
 
 
#4
29.12.2016 13:13:24
maryan, вот откуда Вы взяли эту команду:
Код
    WD.GoTo wdGoToPage, wdGoToAbsolute, 3  ' явно указываю удалить 3 страницу
Макрорекордер Ворда записывает
Код
  Selection.GoTo What:=wdGoToPage, Which:=wdGoToNext, Name:="3"
То есть ваша команда должна быть
Код
    objWrdApp.Selection.GoTo What:=wdGoToPage, Which:=wdGoToNext, Name:=3

Дальше не смотрел, убегаю.
 
 
 
#5
29.12.2016 23:51:18
Спасибо, работает :)  
 
 
 
Страницы: 1
Читают тему
Наверх