Сохранение листов книги как отдельных файлов. Книги листа


Книга "Ференц Лист" из серии Жизнь замечательных людей

 
 

Ференц Лист

Автор: Залесская Мария Кирилловна Жанр: Биографии и мемуары, Музыка Серия: Жизнь замечательных людей Язык: русский Год: 2016 Издатель: Молодая гвардия ISBN: 978-5-235-03923-0 Город: Москва Добавил: Admin 28 Ноя 16 Проверил: Admin 28 Ноя 16 Формат:  FB2 (5369 Kb)  RTF (5675 Kb)  TXT (5169 Kb)  HTML (5290 Kb)  EPUB (5752 Kb)  MOBI (11632 Kb)  JAR (571 Kb)  JAD (0 Kb)  

Рейтинг: 0.0/5 (Всего голосов: 0)

Аннотация

Ференц Лист давал концерты австрийскому и российскому императорам, коралям Англии и Нидерландов, неоднократно встречался с римским папой и гостил у писательницы Жорж Санд, возглавил придворный театр в Веймаре и вернул немецкому городку былую славу культурной столицы Германии. Его называли «виртуозной машиной», а он искал ответы на философские вопросы в трудах Шатобриана, Ламартина, Сен-Симона. Любимец публики, блестящий пианист сознательно отказался от исполнительской карьеры и стал одним из величайших композиторов. Он говорил на нескольких европейских языках, но не знал родного венгерского, был глубоко верующим католиком, при этом имел троих незаконнорожденных детей и страдал от непонимания близких. В светских салонах Европы обсуждали сплетни о его распутной жизни, а он принял духовный сан. Он явил собой уникальный для искусства пример великодушия и объективности, давал бесплатные уроки многочисленным ученикам и благотворительные концерты, помог раскрыться талантам Грига и Вагнера. Вся его жизнь была посвящена служению людям, искусству и Богу.знак информационной продукции 16+

Объявления

Где купить?

Нравится книга? Поделись с друзьями!

Другие книги автора Залесская Мария Кирилловна

Другие книги серии "Жизнь замечательных людей"

Похожие книги

Комментарии к книге "Ференц Лист"

Комментарий не найдено
Чтобы оставить комментарий или поставить оценку книге Вам нужно зайти на сайт или зарегистрироваться
 

www.rulit.me

Разнесение данных на разные листы/книги

MulTEx » 1 Май 2011       Дмитрий       28500 просмотров
Данная функция является частью надстройки MulTEx

Вызов команды:MulTEx -группа Книги/Листы -Книги -Разнесение данных

Команда, делающее обратное Сбору данных с нескольких листов/книг - разносит данные листа на несколько других листов либо книг. Количество листов/книг зависит от количества уникальных значений критериев для разнесения. Листы и Книги создаются при выполнении команды. Для чего это может быть нужно? Например, есть график отпусков сотрудников, который надо разбить по фамилии руководителя отдела и каждому руководителю отправить по почте список только его сотрудников:Сидеть и выбирать данные каждого сотрудника на отдельные листы вручную долго и скучно. Плюс еще и отправить надо на указанный адрес. А команда Разнесение данных сама разобьет данные на листы и книги и отправит их по указанным адресам.

Основные Разнести:

  • Все данные - при выборе будет произведено разнесение абсолютно всех данных, расположенных на листе.
  • Указанный диапазон - будут разнесены только те данные, которые расположены внутри указанного диапазона. Диапазон следует указывать без заголовка. Иначе заголовок будет определен как отдельный критерий и для него будет так же создан свой лист/книга.

Критерии:

  • На основании значений - разнесение данных происходит на основании значений в ячейках. На рисунках выше таблица разносится именно на основании значений и в качестве столбца с критериями указан столбец с фамилиями руководителей. Это значит, что после выполнения команды будет создана новая книга, содержащая ровно столько листов, сколько руководителей в таблице. И в каждом листе будут содержаться только те сотрудники, которые работают в отделе, подчиненном данному руководителю.
  • На основании цвета заливки - разнесение данных происходит на основании цвета заливки ячеек. В данном случае новым листам/книгам будет присвоено имя, равное числовому коду цвета заливки ячеек, а цвет ярлыков листов - равен цвету заливки ячеек.
  • На основании цвета шрифта - разнесение данных происходит на основании цвета шрифта. В данном случае новым листам/книгам будет присвоено имя, равное числовому коду цвета шрифта, а цвет ярлыков листов - равен цвету шрифта.
  • На фиксированное количество строк - данные будут разнесены пропорционально указанному количеству строк в окне напротив данной опции. Будут созданы листы/книги

www.excel-vba.ru

Листы и книги

Дмитрий      20 Март 2018      Просмотров:   126       Нет комментариев

Вызов команды: MulTEx -группа Ячейки/Диапазоны -Диапазоны -Создать листы из списка С помощью данной команды можно быстро создать множество листов, сразу назначив им имена либо на основании диапазона ячеек, либо нумерацией(с указанием начальной и конечной границ). Так же можно указать, создавать листы как копии другого листа(шаблона) или после создания листов копировать в них указанную таблицу. Для чего это может быть нужно? Например, для создания листов по определенному шаблону на каждый день месяца(от 1 до 31). Создавая листы, использовать...

Рубрика:

Дмитрий      11 Февраль 2018      Просмотров:   2493       1 комментарий

На примере файлов бюджетов покажу как можно собирать данные со всех этих файлов в одну итоговую таблицу и просуммировать все присланные данные по статьям из каждой таблицы. Если еще не работали с надстройкой PowerQuery и не знаете что это такое, то для начала лучше ознакомиться со статьей: Power Query - что такое и почему её необходимо использовать в работе? Ниже можно скачать файлы, которые применялись в статье. В архиве два файла бюджета(в папке Бюджет) и готовая модель с запросом(файл "Сводный"). В файле с запросом так же применен прием получения пути...

Рубрика:

Дмитрий      7 Январь 2017      Просмотров:   3211       Нет комментариев

Вызов команды: MulTEx -группа Ячейки/Диапазоны -Диапазоны -Подготовить таблицу - строки Иногда в результате многочисленных манипуляций с книгой Excel она "раздувается" - в ней может быть всего один лист, данных не более 1000 строк и пары столбцов, но размер файла при этом мегабайта полтора, два, три, а то и все десять. Но главная проблема даже не столько в размере файла как в том, что при этом файл как правило "тормозит" и долго открывается. А это уже действительно проблема. Почему файл "раздувается"? В большинстве случаев это происходит по...

Рубрика:

Дмитрий      9 Июль 2016      Просмотров:   386       Нет комментариев

Вызов команды: MulTEx -группа Книги/Листы -Книги -Сохранить все Команда сохраняет все открытые в текущем сеансе книги одним нажатием. Для чего это нужно? Стандартно все открытые книги сохранить нет возможности. Возможно лишь закрыть все книги с сохранением (для этого необходимо нажать кнопку закрытия приложения с зажатой клавишей Shift и при запросе на сохранение выбрать Сохранить все (Save All)). Но часто закрывать книги нет необходимости - требуется только сохранять. Например, когда одновременно приходится работать с несколькими открытыми...

Рубрика:

Дмитрий      19 Январь 2016      Просмотров:   12425       Нет комментариев

Вызов команды: MulTEx -группа Книги/Листы -Книги -Заполнить по шаблону Команда Заполнить по шаблону создает множество заполненных на основании выбранного шаблона файлов из данных в таблице Excel. Например, есть таблица с продукцией примерного такого вида: Только строк не один десяток и необходимо создать ценники на весь перечисленный товар по шаблону: и либо распечатать, либо создать на каждый товар по отдельному файлу. Вручную делать такое не просто нудно - это к тому же займет кучу времени. Однако, если шаблон привести к нужному виду, а в...

Рубрика:

Дмитрий      18 Декабрь 2015      Просмотров:   7869       2 комментария

Довольно часто у пользователей после продолжительной работы в файле возникает проблема: при изменении условия фильтрации(Данные(Data) -Фильтр(Filter)) файл задумывается на минуту, а порой и не на одну. В этой статье я решил рассмотреть несколько причин подобного поведения файла и как их устранить. При этом описанные методы так же справедливы и для случаев, когда файл тормозит не только при фильтрации, но и при других изменениях на листе: Большое количество формул и функций на листах Самая частая причина - наличие большого количества формул на...

Рубрика:

Дмитрий      4 Март 2015      Просмотров:   18780       Нет комментариев

Задача: записать в отдельной ячейке или внутри формулы имя текущего листа(т.е. того, в котором сама функция). В принципе это очень легко сделать простейшей функцией пользователя: Visual Basic '--------------------------------------------------------------------------------------- ' Procedure : GetShName ' DateTime : 04.03.2015 10:44 ' Author : The_Prist(Щербаков Дмитрий) ' http://www.excel-vba.ru ' Purpose : Функция возвращает в ячейку имя листа ' rCell - Необязательный аргумент. ' Если указан - функция вернет имя листа, на котором расположена эта ячейка ' Если не указан - функция...

Рубрика:

Дмитрий      21 Август 2014      Просмотров:   425       Нет комментариев

Получение имени книги   Функция возвращает имя книги указанной ячейки. Если ячейка не указана - функция вернет имя книги, в листе которой записана сама функция. Вызов команды через стандартный диалог: Мастер функций-Категория "MulTEx"- ИМЯ_КНИГИ Вызов с панели MulTEx: Сумма/Поиск/Функции - Полезности - ИМЯ_КНИГИ Синтаксис: =ИМЯ_КНИГИ(A1) Ячейка(A1) - Необязательный аргумент. Ссылка на ячейку листа, имя книги которого необходимо получить. Если не указана - будет вычислено имя книги, в листе которой записана сама функция. Важно: Функция не вычисляется...

Рубрика:

Дмитрий      21 Август 2014      Просмотров:   375       Нет комментариев

Получение имени листа Функция возвращает имя листа указанной ячейки. Если ячейка не указана - функция вернет имя листа, в котором записана сама функция. Вызов команды через стандартный диалог: Мастер функций -Категория "MulTEx" -ИМЯ_ЛИСТА Вызов с панели MulTEx: Сумма/Поиск/Функции -Полезности -ИМЯ_ЛИСТА Синтаксис: =ИМЯ_ЛИСТА(A1) Ячейка(A1) - Необязательный аргумент. Ссылка на ячейку листа, имя которого необходимо получить. Если не указана - будет вычислено имя листа, в котором записана сама функция. Важно: Функция не вычисляется при изменении имени...

Рубрика:

Дмитрий      17 Февраль 2014      Просмотров:   3907       Нет комментариев

Вызов команды: MulTEx -группа Книги/Листы -Листы -Изменить колонтитулы Изменяет и создает колонтитулы сразу на нескольких листах книги: всех или только выбранных, а так же поможет скопировать в указанные листы колонтитулы с выбранного листа. Все, что требуется это выбрать листы, на которых необходимо изменить колонтитулы и указать какие именно колонитулы изменить. Копировать колонтитулы с листа: Выбирается лист текущей книги, с которого будут скопированы все колонтитулы в выбранные листы. Примечание: из-за некоторых особенностей хранения...

Рубрика:

www.excel-vba.ru

Книга и листы в Excel 2010 — MS Excel

Как уже говорилось, по умолчанию новая книга в Excel 2010 создается с названием Книга [ номер книги ] и с тремя листами с названиями Лист1, Лист2 и Лист3. Переключение между листами производится выборомсоответствующего ярлычка (рис. 1.17).

Рис. 1.17. Ярлычки листов

Последний ярлычок со звездочкой предназначен для быстрого добавления нового листа. Листы можно добавлять и удалять, а также переименовывать. Делается это при помощи команд контекстного меню, вызываемого щелчком правой кнопки мыши на ярлычках листов (рис. 1.18). Назначение команд этого контекстного меню описано ниже.

Рис. 1.18. Контекстное меню ярлычков листов

  1. Вставить — при помощи этой команды в книгу можно добавить новый лист или другой объект, такой как диаграмма, макрос, диалоговое окно, шаблонная таблица. Команда Добавить выводит на экран диалоговое окно, в котором можно выбрать тип добавляемого объекта.
  2. Удалить — удаляет из книги текущий лист (таблицу).
  3. Переименовать — дает возможность назначить таблице другое имя.
  4. Переместить/скопировать — при помощи этой команды можно производить перемещение (копирование) текущего листа в другую книгу, а также перемещение текущего листа внутри текущей книги для изменения порядка следования листов. Для того чтобы переместить лист в другую книгу, последняя также должна быть открыта.
  5. Исходный текст — позволяет просмотреть текст программ на макроязыке (если, конечно, таблица, помимо стандартных элементов, содержит эти программы).
  6. Защитить лист — позволяет защитить с помощью пароля от несанкционированных изменений как весь лист, так и отдельные его элементы.
  7. Цвет ярлычка — позволяет подобрать для ярлычка раскраску на ваш вкус.
  8. Скрыть — скрывает текущий лист.
  9. Отобразить — отображает листы, скрытые командой Скрыть.
  10. Выделить все листы — позволяет пометить для перемещения (копирования) сразу все листы текущей книги.
Упражнение

Это упражнение призвано научить вас операциям с рабочими листами.

Рис. 1.19. Перемещение/копирование листов

  1. Создайте две новые книги. В результате у вас в Excel должно быть две книги: Книга1 и Книга2.
  2. Перейдите в окно Книга1, щелкните правой кнопкой мыши на ярлычке Лист1 и выберите в контекстном меню команду Переименовать. Курсор переместится в текстовое поле с названием листа. Удалите старое название Лист1 и введите новое — Это мой лист. Щелкните мышью вне ярлычка. Новое название листа вступит в силу.
  3. Щелкните правой кнопкой мыши на ярлычке Это мой лист и выберите в контекстном меню команду Добавить. После выполнения команды новый лист Лист4 будет добавлен перед текущим листом. Запомните, что новые листы вставляются перед выбранным листом.
  4. Щелкните правой кнопкой мыши на ярлычке Это мой лист и выберите в контекстном меню команду Переместить/скопировать. На экран будет выведено диалоговое окно, показанное на рис. 1.19.
  5. Прокрутите список перед листом вниз, выберите пункт (переместить в конец) и щелкните на кнопке OK. Убедитесь, что лист Это мой лист переместился в конец набора ярлычков.
  6. Щелкните правой кнопкой мыши на ярлычке Это мой лист и выберите в контекстном меню команду Переместить/скопировать. Проделайте все то же, что и на предыдущем шаге, только предварительно в раскрывающемся списке В книгу выберите пункт Книга2. Убедитесь, что лист Это мой лист пропал из книги Книга1 и появился в книге Книга2 в конце набора ярлычков.
  7. Проделайте то же самое, что и на предыдущем шаге, только в качестве приемника выберите книгу Книга1 и установите флажок Создавать копию. Таблица Это мой лист должна появиться в книге Книга1 и остаться в книге Книга2. Таким способом производят копирование таблиц из одной книги в другую.

excel2010.ru

Читать книгу Листья »Апдайк Джон »Библиотека книг

ЛистьяДжон Апдайк

Музыкальная школаДжона Апдайка в Америке нередко называют самым талантливым и плодовитым писателем своего поколения. Он работает много и увлеченно во всех жанрах: пишет романы, рассказы, пьесы и даже стихи (чаще всего иронические).

Настоящее издание ставит свой целью познакомить читателя с не менее интересной и значимой стороной творчества Джона Апдайка – его рассказами.

В данную книгу включены рассказы из сборников «Та же дверь» (1959), «Голубиные перья» (1962) и «Музыкальная школа» (1966). Большинство переводов выполнено специально для данного издания и публикуется впервые.

Джон Апдайк

Листья

Виноградные листья у меня за окном поразительно красивы. Поразительно, потому что после долгой ночи сосредоточения на себе, страха и позора мне странно видеть, что, оказывается, по-прежнему есть в мире красота, что независимо от наших крахов по-прежнему сохранились естественная соразмерность и ненавязчиво-изощренное изобилие «изобразительных средств», чем метит Природа истинные создания свои. Природа; сегодня утром я точно знаю, что природное – это то, чему чуждо чувство вины. Наши тела существуют в Природе; наши ботинки, шнурки, пластмассовые наконечники шнурков – все, что вокруг нас, вблизи и вдали, – существуют в Природе; и, однако же, что-то нас к ней не пускает, вроде выталкивающей силы воды, которая не дает коснуться песчаного дна, такого ребристого, усеянного полумесяцами ракушечных обломков, – а кажется, вот оно, только руку протянуть.

На ветку за окном прилетела сойка. И сразу прочно устроилась, чуть враскорячку, повернув ко мне облезлую гузку, а голова настороженно окаменела, отпечатавшись хищным крючконосым силуэтом на фоне белесого неба, простершегося над ржавым болотом. Видите ее? Я вот увидел и, оборвав цепь своих мыслей, протянул руку сквозь стекло, поймал и запечатлел на этом листе. А она уже улетела. Но все равно так и осталась несколькими строчками выше враскорячку сидеть на ветке, и гузка у нее облезлая, а голова настороженно окаменела. Что умею, то умею, хоть это, может, никому и не нужно.

Виноградные листья там, где не затеняют друг друга, золотятся. Плоские, они принимают на себя и отбрасывают лучи всей поверхностью, и чистый свет, эта сумма спектра и источник жизни, отражается ярко-желтым, как его раскрашивают дети. На жухлых листьях заемное это свечение густеет до темно-оранжевого, а те, что еще свежи и зелены, – потому что, если присмотреться, зелень держится в листве до глубокой осени, – отцеживают из солнца нежную лимонную субстанцию. Тени, которыми листья пятнают друг друга, нервные и бегучие на ветру, рассыпающем по крыше уютные шорохи, образуют, несмотря на это, разные четкие узоры – какие-то бессчетные варварские ятаганы, копейные наконечники, двузубцы, боевые шлемы. Но общее впечатление, как ни странно, совсем не угрожающее. Наоборот, прихотливая игра символов одновременно крова и пространства, тепла и ветра манит наружу; мой взгляд ныряет в листву за окном. Листья, листья со всех сторон. На дубе они как цепкие когти, в иссиня-бурой ржавчине. На вязе – перистые, сквозящие женственной желтизной. На сумахе – зубчатые, рдеющие горячим румянцем. Я блаженно плаваю в огненной лиственной вселенной. Но что-то цепляет меня и тянет назад во внутреннюю тьму, где солнцем – больная совесть.

Надо разобраться в событиях. Мне говорят, что я вел себя бессовестно; теперь понадобится немало времени, чтобы как-то совместить это всеобщее осуждение с сознанием безоговорочной правоты, которая в наших собственных глазах всегда облекает наши поступки, даже самые неудачные. Ну а когда события разобраны – действиям найдена мотивация, действующим лицам придана психология, промахи разбиты на категории, злодеяния названы своими именами, все эти буйные, непричесанные джунгли подстрижены объяснениями и укоренены в Истории, тем самым как бы возвратившись в Природу, – что тогда? Не сомнителен ли такой возврат? Способны ли наши души утешиться сознанием, что все пройдет, и мирно растаять в лиственном перегное? Нет. Мы стоим на пересечении двух миров, и нет хода ни вперед, ни назад, только может еще тоньше стать разделяющая грань.

Я помню очень отчетливо, какое черное платье было на жене, когда она уходила из дому получать развод. Мягкое, облегающее, с треугольным вырезом, оно всегда ей шло, выгодно оттеняло ее бледность. В то утро она была особенно красива: лицо такое бледное, измученное, мертвенное. А тело, ведь оно относится к миру Природы, знать ничего не знало о нашем крахе, оно выглядело и двигалось до несуразности как всегда. Уходя, она мельком чмокнула меня, и мы оба ощутили юмор ситуации: можно было подумать, что она просто собралась, как обычно, в Бостон – на концерт в «Симфони-холл» или за покупками в «Бонвит»[1 - _«Бонвит»_– дорогой универсальный магазин в Бостоне.]. Так же нашарила в сумочке ключи и так же озабоченно дала наставления благодушной женщине, которая оставалась с детьми, и так же, сев в машину, сперва провалилась с головкой, а потом вынырнула и подалась вперед. Получив наконец то, что хотел, разведенный, я посмотрел на своих детей глазами оставившего их, оглядел дом, как разглядывают фотоснимки из невозвратного прошлого, сел в машину и рванул через осенний пейзаж, точно человек в асбестовой робе через бушующее пламя, – туда, где меня ждала новая суженая, в слезах, но с улыбкой, потрясенная, но недрогнувшая, и тут, к своему ужасу, вдруг почувствовал, что мой внутренний мрак, разодрав кожу, вырвался наружу и поглотил нас обоих, утопил нашу любовь. Мир Природы, к которому она относилась, перестал существовать. Мое сердце испуганно шарахнулось назад, да так по сей день и дрожит в испуге. Я отступил. И когда ехал обратно, листья на деревьях вдоль шоссе служили мне дорожными знаками. Вот и вся история. Я по телефону притянул жену назад; крепко обнял черное платье и приготовился встретить боль.

Она не заставляет себя ждать, боль. Что ни день, новая ее порция приходит по почте, во взгляде, по телефонному проводу. При каждом звонке я жду, что вот сейчас отмотается новый виток последствий. Спрятался в этот загородный домик, но и здесь есть телефон, и шорохи ветра, сучьев, невидимки-зверьки заряжены его электрическим молчанием. В любую минуту он может взорваться, и снова затмится поразительная красота листьев.

Я встаю и нервно прохожу по половицам. Прямо в воздухе, перед самым моим лицом, белой типографской звездочкой висит паучок. Задираю голову, но никак не разгляжу на потолке, где прикреплена к сухой штукатурке его паутинка. Паучок в нерешительности. Чувствует чужое исполинское присутствие. Воинственно растопырив белые симметричные ножки, он под действием собственной тяжести начинает вращаться на невидимой нити. Ловлю себя на том, что стою в забавной древней позе мудреца, который тщится из созерцания паука извлечь мораль[2 - Согласно популярной легенде, шотландский король Роберт Брюс (1306–1329) научился упорству у паука, наблюдая, как тот снова и снова плетет свою постоянно сметаемую паутину, пример вдохновил короля, и он в конце концов выгнал англичан из своей страны.], и мне становится стыдно. Однако я отбрасываю стыд и сосредоточиваю внимание на крохотном многоугольничке, так наставительно спущенном к самому моему носу. Мораль никак не извлекается. Мы с пауком обитаем в сопредельных, но несовпадающих вселенных. Через пропасть нас объединяет только страх. Телефон молчит. Паучок, поразмыслив, начинает вращаться в обратную сторону. А ветер продолжает размешивать солнечный свет. Выходя и входя, я натаскал на подошвах несколько сухих листьев, они расплющены на полу, как обрывки темной бумаги.

А эти страницы разве не листья? И разве не для того я их исписываю, чтобы посредством некоего личного фотосинтеза переложить мою вину на Природу, у которой нет виноватых? Топкий берег, ровный, как ковер, теперь весь в бледно-зеленых разводах по коричневому разных оттенков: охристого, ржавого, рыжего, каштанового, – а там, где суша поднимается выше уровня прилива, хмуро топорщатся хвойные верхушки. За ними виднеется невысокий синий холм; здесь, в прибрежном краю, холмы слишком скромны, чтобы иметь имена. Но я его вижу, вижу впервые за месяцы. Как мальчишка, вцепившись кончиками пальцев и вытянув шею, видит за безжалостно высоким забором крышу скрытого дома. А под окном трава отросла и полегла нестриженая, зеленая, вперемешку с листьями, летящими с подростка-вяза; и я вспоминаю, как приехал в этот домик, убежденный, что оставил свою жизнь в городе, и в первую ночь лег спать один, взяв почитать перед сном, как берут в чужом доме, первую попавшуюся книгу, старое издание «Листьев травы»[3 - _«Листья_травы»_(1855) – поэтический сборник американского поэта Уолта Уитмена (1819–1892).].

Сон мой был подобен петле: когда я проснулся, то оказался как бы еще в книге, и светящееся небо, сквозящее в голых ветвях молодого вяза, будто бы тоже было страницей из Уитмена, и я лежал весь нараспашку, как женщина, отдающаяся страсти, свободный и любящий, без единого темного уголка в душе. Это было божественное пробуждение. Но к вечеру я уже снова был у себя дома. Четкие дикарские тени виноградных листьев сместились. Изменился угол падения света. Мне кажется, что тепло снаружи навалилось на дверь, я подхожу и открываю ему – и солнечный свет плашмя падает к моим ногам, как кающийся грешник.

notes

Примечания

1

_«Бонвит»_– дорогой универсальный магазин в Бостоне.

2

Согласно популярной легенде, шотландский король Роберт Брюс (1306–1329) научился упорству у паука, наблюдая, как тот снова и снова плетет свою постоянно сметаемую паутину, пример вдохновил короля, и он в конце концов выгнал англичан из своей страны.

3

_«Листья_травы»_(1855) – поэтический сборник американского поэта Уолта Уитмена (1819–1892).

www.libtxt.ru

Сохранение листов книги как отдельных файлов

Про сборку листов из нескольких книг в одну текущую я уже писал здесь. Теперь разберем решение обратной задачи: есть одна книга Excel, которую нужно "разобрать", т.е. сохранить каждый лист как отдельный файл для дальнейшего использования.

Примеров подобного из реальной жизни можно привести массу. Например, файл-отчет с листами-филиалами нужно разделить на отдельные книги по листам, чтобы передать затем данные в каждый филиал и т.д.

Если делать эту процедуру вручную, то придется для каждого листа выполнить немаленькую цепочку действий (выбрать лист, правой кнопкой по ярлычку листа, выбрать Копировать, указать отдельный предварительно созданный пустой файл и т.д.) Гораздо проще использовать короткий макрос, автоматизирующий эти действия.

Способ 1. Простое разделение

Нажмите сочетание Alt+F11 или выберите в меню Сервис - Макрос - Редактор Visual Basic (Tools - Macro - Visual Basic Editor), вставьте новый модуль через меню Insert - Module и скопируйте туда текст этого макроса:

Sub SplitSheets1() Dim s As Worksheet For Each s In ActiveWorkbook.Worksheets 'проходим по всем листам в активной книге s.Copy 'копируем каждый лист в новый файл Next End Sub

Если теперь выйти из редактора Visual Basic и вернуться в Excel, а затем запустить наш макрос (Alt+F8), то все листы из текущей книги будут разбиты по отдельным новым созданным книгам.

Способ 2. Разделение с сохранением

При необходимости, можно созданные книги сразу же сохранять под именами листов. Для этого макрос придется немного изменить, добавив команду сохранения в цикл:

Sub SplitSheets2() Dim s As Worksheet Dim wb as Workbook Set wb = ActiveWorkbook For Each s In wb.Worksheets 'проходим во всем листам активной книги s.Copy 'сохраняем лист как новый файл ActiveWorkbook.SaveAs wb.Path & "\" & s.Name & ".xlsx" 'сохраняем файл Next End Sub

Этот макрос сохраняет новые книги-листы в ту же папку, где лежал исходный файл. При необходимости сохранения в другое место, замените wb.Path на свой путь в кавычках, например "D:\Отчеты\2012" и т.п.

Если нужно сохранять файлы не в стандартном формате книги Excel (xlsx), а в других (xls, xlsm, xlsb, txt и т.д.), то кроме очевидного изменения расширения на нужное, потребуется добавить еще и уточнение формата файла - параметр FileFormat:

ActiveWorkbook.SaveAs wb.Path & "\" & s.Name & ".xlsb", FileFormat:=50

Для основных типов файлов значения параметра FileFormat следующие:

  • XLSX = 51
  • XLSM = 52
  • XLSB = 50
  • XLS = 56
  • TXT = 42
Полный список всех вариантов можно посмотреть в справке MSDN.

Способ 3. Сохранение в новые книги только выделенных листов

Если вы хотите раскидать по файлам не все листы в вашей книге, а только некоторые, то макрос придется немного изменить. Выделите нужные вам листы в книге, удерживая на клавиатуре клавишу Ctrl или Shift и запустите приведенный ниже макрос:

Sub SplitSheets3() Dim AW As Window Set AW = ActiveWindow For Each s In AW.SelectedSheets Set TempWindow = AW.NewWindow 'создаем отдельное временное окно s.Copy 'копируем туда лист из выделенного диапазона TempWindow.Close 'закрываем временное окно Next End Sub

Создавать новое окно и копировать через него, а не напрямую, приходится потому, что Excel не умеет копировать группу листов, если среди них есть листы с умными таблицами. Копирование через новое окно позволяет такую проблему обойти.

Способ 4. Сохранение только выделенных листов в новый файл

Во всех описанных выше способах каждый лист сохранялся в свой отдельный файл. Если же вы хотите сохранить в отдельный новый файл сразу группу выделенных предварительно листов, то нам потребуется слегка видоизменить наш макрос:

Sub SplitSheets4() Dim CurW As Window Dim TempW As Window Set CurW = ActiveWindow Set TempW = ActiveWorkbook.NewWindow CurW.SelectedSheets.Copy TempW.Close End Sub

Способ 5. Сохранение листов как отдельных PDF-файлов

Этот способ чем-то похож на второй, но листы сохраняются не как отдельные книги Excel, а в формате PDF, что часто требуется, если никто не должен менять документ и увидеть ваши формулы. Обратите внимание, что:
  • для этого используется уже другой метод (ExportAsFixedFormat а не Copy)
  • листы выводятся в PDF с параметрами печати, настроенными на вкладке Разметка страницы (Page Layout)
  • книга должна быть сохранена на момент экспорта

Нужный нам код будет выглядеть следующим образом:

Sub SplitSheets5() Dim s As Worksheet For Each s In ActiveWorkbook.Worksheets s.ExportAsFixedFormat Filename:=ThisWorkbook.Path & "\" & s.Name & ".pdf", Type:=xlTypePDF Next End Sub

Способ 6. Готовый макрос из надстройки PLEX

Если лень или нет времени внедрять все вышеописанное, то можно воспользоваться готовым макросом из моей надстройки PLEX:

Ссылки по теме

 

www.planetaexcel.ru

Отправка листа/книги по почте

MulTEx » 1 Май 2011       Дмитрий       28308 просмотров
Данная функция является частью надстройки MulTEx

Вызов команды:MulTEx -группа Книги/Листы -Листы -Отправка листа/книги по почте

Данная команда поможет быстро отправить по почте:
  • один активный лист
  • активную книгу
  • отдельные листы активной книги

и осуществить массовую рассылку сразу множеству разных получателей, с возможностью указать для каждого получателя отдельную тему письма, текст и вложить в каждое письмо указанные файлы. Так же можно указать адреса для отправки копий и скрытых копий, вставить в письмо диапазон ячеек с форматированием и указанную подпись. Рассылка может производиться как при помощи MS Outlook, так и без него.

Отправка листа/книгиС этой вкладки можно отправить указанному получателю активный лист, активную книгу или выбранные листы. Так же с этой вкладки можно управлять собственной адресной книгой MulTEx: добавлять и удалять адреса в книгу.

рис.1

Отправить:

  • активный лист - в созданное письмо будет вложена новая книга, содержащая только один лист - тот, который был активным на момент отправки сообщения. Лист отправляется как есть - т.е. адресат получит точную копию листа на момент отправки (даже если какие-то изменения не были сохранены перед отправкой).
  • активную книгу полностью - в созданное письмо будет вложена копия активной на момент отправки сообщения книги. Книга отправляется как есть - т.е. адресат получит точную копию книги на момент отправки (даже если книга не была сохранена перед отправкой).
  • выбранные листы как новую книгу - в этом случае становится доступным окно выбора листов активной книги, в котором можно отметить флажками только те листы, которые необходимо отправить. Отмеченные листы впоследствии будут объединены в одну новую книгу, которая и будет вложена в письмо. Все листы переносятся как есть, даже если исходная книга не была сохранена перед отправкой.

Отправить на адрес:

    в поле записывается вручную или выбирается из списка действительный адрес электронной почты получателя. Если еще не добавлено ни одного адреса, список будет пуст. Для добавления адреса в список необходимо записать его в поле и нажать кнопку - добавляет текущий адрес(записанный в поле выпадающего списка) в собственную адресную книгу надстройки. В дальнейшем будет возможно не вводить этот адрес вручную, а просто выбрать его из выпадающего списка. Можно заранее создать множество адресов путем поочередной записи в поле и добавления. - удаляет из адресной книги MulTEx текущий адрес(записанный в поле выпадающего списка). После удаления данный адрес более не будет доступен для выбора из списка. Удаление адреса из списка влияет исключительно на собственную адресную книгу MulTEx, никакие адреса Outlook или адреса иных почтовых программ не затрагиваются.Очистить адресную книгу MulTEx - удаление всех адресов из Адресной книги MulTEx. Удаление влияет исключительно на собственную адресную книгу MulTEx, никакие адреса Outlook или адреса иных почтовых программ не затрагиваются.Адресная книга хранится в специальном файле "MailSet.xml". Вы можете самостоятельно делать резервные копии данного файла при помощи команды Резервное копирование и восстановление. При переустановке MulTEx этот файл не удаляется и не заменяется.

Тема письма: - указывается тема письма. Желательно указывать не более 255 символов, т.к. более длинный текст будет обрезан до 255 символов, т.к. большинство почтовых программ не работают с темой, длина текста которой превышает 255 символов.

Отправить копию на адрес - записывается вручную или выбирается из списка действительный адрес электронной почты, на которую должна быть отправлена копия письма. Адрес может быть выбран из адресной книги MulTEx или занесен вручную.

Массовая рассылкаДанная вкладка поможет сделать рассылку писем группе адресатов на основе созданных на листе Excel списков. Можно один раз создать несколько списков под различные ситуации (для оповещения о совещаниях, отправки отчетов и т.д.) и использовать их потом не создавая каждый раз списки получателей, тексты и темы заново. Каждому получателю может быть отправлен свой текст сообщения со своей темой и своими вложенными файлами или всем адресатам могут быть назначены одинаковые тема, текст сообщения, вложения. Так же можно дополнительно указать адреса для отправки копий писем и скрытых копий:

рис.2

Со всех вкладок массовой рассылки(Массовая рассылка, Настройка массовой рассылки, Дополнительно) доступна возможность создания тестового письма и его отправки на указанный адрес:/uploadfiles/images/multex/forms/MulTEx_Forms_SendMailMass_testmail.pngАдрес может быть выбран из списка (используется адресная книга MulTEx) или занесен вручную

Адреса получателей - указывается диапазон ячеек на листе(только один столбец!) с адресами электронной почты получателей.

Тема(ы) сообщений - указывается диапазон ячеек на листе(только один столбец!) с темой письма.Одна тема для всех писем - устанавливается, если для всех адресатов необходимо указать только одну тему. В данном случае названием темы будет значение верхней левой ячейки указанного диапазона.

Текст(ы) сообщений - указывается диапазон ячеек на листе(только один столбец!) с текстом письма.Один текст для всех писем - устанавливается, если для всех адресатов необходимо указать только один текст сообщения. В данном случае в качестве текста для всех сообщений будет текст верхней ячейки указанного диапазона.

Вложения - указывается диапазон ячеек на листе(только один столбец!) с полным путем к файлу для отправки(для указания полного пути можно воспользоваться командой MulTEx - Путь к файлу). Можно в одной ячейке указать несколько вложений. Указывать следует через запятую с указанием полного пути к каждому файлу. Разделение путей к файлам должны быть без пробелов - только запятая. Иначе вложение может не прикрепиться.Одно вложение для всех писем - устанавливается, если всем адресатам необходимо отправить одинаковые файлы. В данном случае отправлены будут файлы, пути к которым указаны в верхней левой ячейке указанного диапазона.

Копия на адреса - указывается диапазон ячеек на листе(только один столбец!) с адресами электронной почты, которые должны быть поставлены в копию письма. В одной ячейке можно указать сразу несколько электронных адресов, разделив их точкой-с-запятой: [email protected];[email protected];[email protected] Никаких лишних пробелов между адресами быть не должно.Одна копия для всех писем - устанавливается, если всем письмам необходимо указать одинаковые адреса для копий. В данном случае адреса для всех сообщений будут взяты из верхней левой ячейки указанного диапазона.

Скрытая копия на адреса - указывается диапазон ячеек на листе(только один столбец!) с адресами электронной почты, которые должны быть поставлены в скрытую копию письма.Скрытая копия - если адрес получателя записан в скрытой копии, то никто из других получателей не будет видеть, что он поставлен в копию.

В одной ячейке можно указать сразу несколько электронных адресов, разделив их точкой-с-запятой: [email protected];[email protected];[email protected] Никаких лишних пробелов между адресами быть не должно.Одна скрытая копия для всех писем - устанавливается, если всем письмам необходимо указать одинаковые адреса для скрытых копий. В данном случае адреса для всех сообщений будут взяты из верхней левой ячейки указанного диапазона.

Пример таблицы для массовой рассылки:

рис.3

ВАЖНО! Массовая рассылка MulTEx не имеет никаких ограничений по числу отправляемых сообщений. Но различные почтовые серверы могут устанавливать свои лимиты. Например, Gmail и Yandex могут заблокировать email, с которого ведется рассылка, если общее количество отправленных сообщений в день превысит 100 штук. Поэтому производить важные массовые рассылки рекомендуется с собственного SMTP-сервера или корпоративного email.

Настройки массовой рассылкиОтправка без использован

www.excel-vba.ru