Копирование листа в отдельный файл с удалением диапазона.

Страница 1 из 1 1
Модератор форума: китин, _Boroda_, DrMini

Копирование листа в отдельный файл с удалением диапазона. (Макросы/Sub)

Amator

Дата: Среда, 10.12.2014, 14:34 | Сообщение № 1

Группа: Проверенные

Ранг: Форумчанин

Сообщений: 107

Репутация: 0 ±

Замечаний: 0% ±

Excel 2007

Здравствуйте. Макрос взят с форума. Суть такова : код копирует лист , удаляет скрытые строки ,удаляет кнопки , удаляет объекты , удаляет заданный диапазон.Проблемма в следующем. Необходимо чтоб заданный диапазон, который удаляется, уменьшался на число скрытых строк.

К сообщению приложен файл: 7018232.xlsm (28.7 Kb)

Ответить

Amator

Дата: Четверг, 11.12.2014, 11:49 | Сообщение № 2

Группа: Проверенные

Ранг: Форумчанин

Сообщений: 107

Репутация: 0 ±

Замечаний: 0% ±

Excel 2007

Здравствуйте. Помогите , пожалуйста , доработать макрос.Если копировать без предварительной фильтрации строк исходного листа - все работает замечательно. Если исходный лист сначала отфильтровать ( n - число скрытых строк), а тогда скопировать в файл , то необходимо чтоб заданный диапазон Range(Cells(1, 26), Cells(35 - n, 50)).Delete, который удаляется, уменьшался на число скрытых строк (n). Допустим, после фильтрации скрытых строк - 5 , тогда диапазон - Range(Cells(1, 26), Cells(30, 50)).Delete. В примере данная строчка кода не работает.

Ответить

RAN

Дата: Четверг, 11.12.2014, 12:05 | Сообщение № 3

Группа: Друзья

Ранг: Экселист

Сообщений: 5660

Репутация: 1163 ±

Замечаний: 0% ±

2010

Вчера всплыло решение KuklP от 15.08.2011
http://forum.msexcel.ru/index.php/topic,5599.msg53295.html#new

Быть или не быть, вот в чем загвоздка!

Ответить

Копирование листа в отдельный файл с удалением диапазона. (Макросы/Sub)

Страница 1 из 1
1