Помогите с листами

[SAS888]

djkon2007

возможно сделать кнопку при нажатии на которую каждый лист сохранялся бы в отдельную книгу(файл) с названием этого листа в определенную директорию

Возможно. Пример во вложении.

[viter.alex]

Сообщение от SAS888

djkon2007
Возможно. Пример во вложении.

Странно, однако . Зачем делать отдельную функцию Worksheet.SaveAs, если все равно нужно создавать книгу с одним листом, а потом ее сохранять?
Или я чего-то не понимаю?

[EducatedFool]

Сообщение от viter.alex

Странно, однако . Зачем делать отдельную функцию

Если ты имеешь ввиду использование метода SaveAs применительно к объекту Worksheet, то вынужден тебя разочаровать - он не работает
Точнее, работает, но не так, как можно от него ожидать - сохраняет не отдельный лист, а всю книгу (разработчики Excel чего-то там перемудрили)

Поэтому остаётся только вариант с копированием каждого листа, и сохранения создаваемой при этом книги в виде файла.

[SAS888]

А где Вы увидели

отдельную функцию Worksheet.SaveAs

???
В предлагаемом коде, после применения ws.Copy без параметров, создается новая рабочая книга с одним текущим листом (которая по умолчанию становится активной). Затем, присваиваем ему имя (в примере "Sheet1"), затем эту книгу сохраняем по выбранному ранее пути с именем текущего листа книги. По-моему, так быстрее.

[viter.alex]

Сообщение от EducatedFool

Если ты имеешь ввиду использование метода SaveAs применительно к объекту Worksheet, то вынужден тебя разочаровать - он не работает
Точнее, работает, но не так, как можно от него ожидать - сохраняет не отдельный лист, а всю книгу (разработчики Excel чего-то там перемудрили)

Поэтому остаётся только вариант с копированием каждого листа, и сохранения создаваемой при этом книги в виде файла.

Его, родного, и имею! Я с самого начала его предложил, а оказалось, что он не работает. Когда макрос тестировал, то просто посмотрел, что файлы он создал, а содержимое файлов не проверял.
Да, «много еще не доработано!»©

Ну, хоть моя наработка не пропала даром.

[viter.alex]

Сообщение от SAS888

А где Вы увидели ???
В предлагаемом коде, после применения ws.Copy без параметров, создается новая рабочая книга с одним текущим листом (которая по умолчанию становится активной). Затем, присваиваем ему имя (в примере "Sheet1"), затем эту книгу сохраняем по выбранному ранее пути с именем текущего листа книги. По-моему, так быстрее.

В справке увидел. Где же еще? Среди методов оъекта Worksheet