ReSQL.ru
     
powered by simpleCommunicator - 2.0.59     © 2025 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Можно ли сохранить активнй лист новой книгой
11 сообщений из 11, страница 1 из 1
Можно ли сохранить активнй лист новой книгой
    #36914310
Фотография A_Cross
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
A_Cross
Участник
Суть есть книга с кучей листов которые нужно сохранить каждый как отдельную книгу.
Вариант скопировать текущий лист\создать новую книгу\вставить скопирований лист и сохранить
как-то не то что надо.

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
Range("ActiveSheet").Select
    Selection.Copy
    Workbooks.Add
    ActiveSheet.Paste
    Application.CutCopyMode = False
    ActiveWorkbook.SaveAs Filename:= _
        "путь\название.xlsx" _
        , FileFormat:=xlOpenXMLWorkbook, CreateBackup:=False
    ActiveWindow.Close
и выглядит некрасиво
а можно как-то:

текущий лист сохранить как книгу с одним листом соответствующим текущему активному листу?
...
Рейтинг: 0 / 0
22.10.2010, 12:42
| Ответить | Цитировать | Написать  
Можно ли сохранить активнй лист новой книгой
    #36914354
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shocker.Pro
Участник
Запись макроса по копированию листа в новую книгу не помогает?
...
Рейтинг: 0 / 0
22.10.2010, 12:53
| Ответить | Цитировать | Написать  
Можно ли сохранить активнй лист новой книгой
    #36914368
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shocker.Pro
Участник
Copy Method


Syntax 1: Copies the object to the Clipboard. Copies a picture of the point or series to the Clipboard.

Syntax 2: Copies the Range to the specified range or to the Clipboard.

Syntax 3: Copies the sheet to another location in the workbook.

Syntax 1

expression.Copy

Syntax 2

expression.Copy(Destination)

Syntax 3

expression.Copy(Before, After)

expression Required. An expression that returns an object in the Applies To list. To copy an entire chart sheet, use Syntax 3 with the Chart object. To copy only the chart area, use Syntax 1 with the ChartArea object.

Destination Optional Variant. Specifies the new range to which the specified range will be copied. If this argument is omitted, Microsoft Excel copies the range to the Clipboard.

Before Syntax 3: Optional Variant. The sheet before which the copied sheet will be placed. You cannot specify Before if you specify After.

After Optional Variant. The sheet after which the copied sheet will be placed. You cannot specify After if you specify Before.

Remarks

If you don't specify either Before or After, Microsoft Excel creates a new workbook that contains the copied sheet.
...
Рейтинг: 0 / 0
22.10.2010, 12:56
| Ответить | Цитировать | Написать  
Можно ли сохранить активнй лист новой книгой
    #36914403
Фотография A_Cross
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
A_Cross
Участник
Shocker.ProЗапись макроса по копированию листа в новую книгу не помогает?
Будет как-то кострубато
скопировать текущий\создать новую книгу\вставить\сохранить с названием листа с которого скопировали\закрыть\перейти на следующий лист\повторить всё заново.

ЗЫ. Да, я не умею,ещё, писать циклы
...
Рейтинг: 0 / 0
22.10.2010, 13:04
| Ответить | Цитировать | Написать  
Можно ли сохранить активнй лист новой книгой
    #36914448
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shocker.Pro
Участник
A_Cross
Будет как-то кострубато
я уже привел кусок хелпа, надеюсь, там все понятно?
A_CrossЗЫ. Да, я не умею,ещё, писать циклы
это будет примерно так:
Код: plaintext
1.
2.
3.
Dim MySheet As WorkSheet
For Each MySheet In ThisWorkbook.Worksheets
  MySheet.Copy
Next
...
Рейтинг: 0 / 0
22.10.2010, 13:19
| Ответить | Цитировать | Написать  
Можно ли сохранить активнй лист новой книгой
    #36914453
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shocker.Pro
Участник
A_Crossскопировать текущий\создать новую книгу\вставить\сохранить с названием листа с которого скопировали\закрыть\перейти на следующий лист\повторить всё заново.
Да нет же.
Правой кнопкой на ярлык листа => копировать
какие нафиг копировать/вставить
...
Рейтинг: 0 / 0
22.10.2010, 13:20
| Ответить | Цитировать | Написать  
Можно ли сохранить активнй лист новой книгой
    #36914485
Фотография A_Cross
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
A_Cross
Участник
Shocker.Pro,

точьно, в 2010 не сразу разглядел эту "строку"
спс. что натолкнули на мыслю. Тему можно закрыть
...
Рейтинг: 0 / 0
22.10.2010, 13:28
| Ответить | Цитировать | Написать  
Можно ли сохранить активнй лист новой книгой
    #36914561
Фотография A_Cross
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
A_Cross
Участник
Shocker.ProA_Crossскопировать текущий\создать новую книгу\вставить\сохранить с названием листа с которого скопировали\закрыть\перейти на следующий лист\повторить всё заново.
Да нет же.
Правой кнопкой на ярлык листа => копировать
какие нафиг копировать/вставить привык работать без мыши.
С указаным мною куском кода все ясно.
...
Рейтинг: 0 / 0
22.10.2010, 13:46
| Ответить | Цитировать | Написать  
Можно ли сохранить активнй лист новой книгой
    #36914774
Фотография A_Cross
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
A_Cross
Участник
Shocker.Pro,

А в завершение кода. А как создать окно когда будет обработан последний лист?
Есть какой-то masseg.box или textbox? Т.е. после сохранения листа вискакивало окно с текстом и клавишей ОК для закрытия этого окна.
...
Рейтинг: 0 / 0
22.10.2010, 14:56
| Ответить | Цитировать | Написать  
Можно ли сохранить активнй лист новой книгой
    #36914778
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shocker.Pro
Участник
MsgBox
...
Рейтинг: 0 / 0
22.10.2010, 14:58
| Ответить | Цитировать | Написать  
Можно ли сохранить активнй лист новой книгой
    #36914784
Фотография A_Cross
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
A_Cross
Участник
Shocker.ProMsgBoxок. курю мануалы в эту сторону
...
Рейтинг: 0 / 0
22.10.2010, 15:00
| Ответить | Цитировать | Написать  
11 сообщений из 11, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Можно ли сохранить активнй лист новой книгой
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]