Сохранение рабоче области в excel - Word и Excel - помощь в работе с программами

Вы можете сохранить моментальный снимок текущего макета всех открытых и расположенных окон книги в формате файл рабочей области (XLW). Когда вы открываете файл рабочей области, Excel открывает все книги и отображает их в сохраненных макетах.

Примечание: Команда «Сохранить рабочее пространство» недоступна в Excel 2013 и более поздних. Однако вы все равно можете открыть файл рабочей области (XLW), созданный в более ранней версии Excel. Чтобы просмотреть несколько окон в Excel 2013 или более поздней версии, откройте нужные книги или создайте новые окна(> «Новое окно»), а затем расположите их нужным образом(просмотреть > Упорядоставить все).

Откройте в рабочей области книги, которые вы хотите сохранить.
Расположите окна книги так, как вы хотите, чтобы они появлялись при ее открытие, изменяя при необходимости размер каждого окна книги.
На вкладке «Вид» в группе «Окно» нажмите кнопку «Сохранить рабочее пространство».
В поле «Имя файла» введите имя файла рабочей области.

Примечание: По умолчанию оно называется resume.xlw,но его можно переименовать.

Совет: Чтобы открывать книги, сохраненные в файле рабочей области при каждом запуске Excel, можно сохранить этот файл рабочей области в папке XLStart. Сохраните только файл рабочей области (без файлов книг) в папке XLStart. В Windows Vista путь к папке XLStart : C:Usersимя пользователяAppDataLocalMicrosoftExcelXLStart. В Microsoft Windows XP путь к папке XLStart : C:Documents and Settingsимя пользователяApplication DataMicrosoftExcelXLStart.

Нужна дополнительная помощь?

Источник

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

В окне открытой книги перейдите к вкладке «Вид».
В группе «Окно» щелкните по кнопке «Сохранить рабочую область» (рис. 2.17).

Рис. 2.17. Вкладка «Окно». Кнопка «Сохранить рабочую область»

В окне «Сохранить рабочую область» (рис. 2.18) в графе «Имя файла» наберите название файла рабочей области.
Далее действуйте так же, как при обычном сохранении книги

Рис. 2.18. Окно «Сохранить рабочую область»

Источник

NikVikRom

Пользователь

Сообщений: 7
Регистрация: 06.11.2013

Добрый вечер.
Подскажите пожалуйста как Сохранить Рабочую Область в Excel 2013 чтобы сохранить несколько открытых файлов под одним именем (ярлыком). Мне не удалось найти эту команду в меню ни на ленте, ни в полном списке команд (настройка ленты). В более ранних версиях такая возможность была.

The_Prist

Пользователь

Сообщений: 14182
Регистрация: 15.09.2012

Профессиональная разработка приложений для MS Office

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

Даже самый простой вопрос можно превратить в огромную проблему. Достаточно не уметь формулировать вопросы…

NikVikRom Пользователь Сообщений: 7 Регистрация: 06.11.2013	Спасибо. А как то ещё можно измудриться чтобы получить тот же результат?

iam_alex Пользователь Сообщений: 3 Регистрация: 18.01.2017	Друзья, возможность сохранять»рабочую область» в файл .XLW убрали, однако открывать таковые, созданные в предыдущих версиях Excel, можно. Может быть макросом сделать сохранение рабочей области в новых версиях Excel?

Alex_ST Пользователь Сообщений: 2746 Регистрация: 22.12.2012 На лицо ужасный, добрый внутри	Кросс-пост , да ещё к тому же с интервалом всего в 7 минут Алгоритм изложил там же. Изменено: Alex_ST — 20.01.2017 11:37:06 С уважением, Алексей (ИМХО: Excel-2003 — THE BEST!!!) <#0>

The_Prist Пользователь Сообщений: 14182 Регистрация: 15.09.2012 Профессиональная разработка приложений для MS Office	Да еще не только здесь и там У меня на форуме тоже. При этом отписываться в темах автор явно не планирует. Даже самый простой вопрос можно превратить в огромную проблему. Достаточно не уметь формулировать вопросы…

Alex_ST Пользователь Сообщений: 2746 Регистрация: 22.12.2012 На лицо ужасный, добрый внутри	Дима, привет. Глянь на мой алгоритм у Сержа . Имхо, ничего сложного, а фича, на самом деле полезная была. Зря мелко-мягкие с ней так… С уважением, Алексей (ИМХО: Excel-2003 — THE BEST!!!) <#0>

iam_alex

Пользователь

Сообщений: 3
Регистрация: 18.01.2017

23.01.2017 06:42:54

Цитата
The_Prist написал: При этом отписываться в темах автор явно не планирует.

Потому что то не грузится, то ошибки выдает — я и закрыл страничку, чтоб не нервничать)) Да и отписываться (посмотрел) там пока особо не на что — только отсыл на excelworld, там и читаю… и отписываюсь)

Изменено: iam_alex — 23.01.2017 06:43:26

Alex_ST

Пользователь

Сообщений: 2746
Регистрация: 22.12.2012

На лицо ужасный, добрый внутри

23.01.2017 22:48:23

Вот набросал процедуру:

Скрытый текст

Размещаете её в Personal. Делаете кнопку для вызова.
Всё, вроде, работает.
Можно бы доделать, но и без этого работает:
— добавить предложение сохранить все открытые файлы
— добавить диалог сохранения файла

С уважением, Алексей (ИМХО: Excel-2003 — THE BEST!!!)
<#0>

Alex_ST

Пользователь

Сообщений: 2746
Регистрация: 22.12.2012

На лицо ужасный, добрый внутри

#10

24.01.2017 10:32:30

Дополировал на досуге.
Добавил диалоги и, т.к. в Миру у iam_alex

почему-то не фильтровало

, на всякий случай изменил принцип отсечения Personal из списка.

Скрытый текст

При желании апостроф в строке

Код
"' ThisWorkbook.Close" & vbCrLf & _

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

Изменено: Alex_ST — 24.01.2017 10:36:42
(Орфография+Исправил ссылку)

С уважением, Алексей (ИМХО: Excel-2003 — THE BEST!!!)
<#0>

Alex_ST

Пользователь

Сообщений: 2746
Регистрация: 22.12.2012

На лицо ужасный, добрый внутри

#11

26.01.2017 11:00:33

Т.к. в Excel-2013

возникли проблемы

с сохранением файла рабочей области с использованием встроенных диалогов решил вообще диалоги убрать (проверить на 2013-м я сам не могу )
Подправил обработчик события Workbook_Open, записываемый в новую книгу: добавлены проверки на существование файла и на то, что файл с таким именем уже не открыт.
Для Планетян, перешедших на Excel-2013 и желающих продолжать использовать «ампутированную» в нем возможность сохранения рабочей области, выложу процедуру и здесь.

Скрытый текст

С уважением, Алексей (ИМХО: Excel-2003 — THE BEST!!!)
<#0>

karlson7

Пользователь

Сообщений: 67
Регистрация: 17.05.2013

Alex_ST,
Добрый день. Не знаю, смотрите ли еще эту тему, но у меня появилась такая проблема с Вашим макросом.
Стоит Excel 2019, при запуске макроса он доходит до строчки
With .VBProject.VBComponents(1).CodeModule
и выдает сообщение, что этот проект не является достоверным макрос останавливается. Получается открытая книга, где прописаны ссылки на ранее файлы. В принципе, можно просто сохранить этот файл с раширением xlw.
А можно как-то подкорректировать макрос, чтобы он это делал сам? Спасибо!

Alex_ST

Пользователь

Сообщений: 2746
Регистрация: 22.12.2012

На лицо ужасный, добрый внутри

karlson7, для того, чтобы процедура могла прописывать код в модули проекта VBA, необходимо дать соответствующее разрешение в Центре управления безопасностью:
Файл → Параметры → Центр управления безопасностью → Параметры макросов: поставить галочку «Доверять доступ к объектной модели проектов VBA»
Подробнее читайте

Что необходимо для внесения изменений в проект VBA(макросы) программно

На Планете также есть топик

Доверять доступ к объектной модели проектов VBA

С уважением, Алексей (ИМХО: Excel-2003 — THE BEST!!!)
<#0>

karlson7

Пользователь

Сообщений: 67
Регистрация: 17.05.2013

Alex_ST, добрый день.
Спасибо за помощь. Теперь все более-менее работает. Открывается новая книга в формате xlsx, где записаны имена открытых файлов. Макрос останавливается, но, как я понимаю, это уже связано с особенностями Excel 2019. Новая книга содержит макрос, и ее надо сохранять в xlsm.
Однако в таком виде уже можно работать.
Спасибо большое за помощь!

Alex_ST

Пользователь

Сообщений: 2746
Регистрация: 22.12.2012

На лицо ужасный, добрый внутри

karlson7,
основные доработки и обсуждения были в основном в Миру Excel в топике

«Сохранить рабочую область» в Excel-2013

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

С уважением, Алексей (ИМХО: Excel-2003 — THE BEST!!!)
<#0>

karlson7 Пользователь Сообщений: 67 Регистрация: 17.05.2013	#16 15.06.2022 15:11:01 Alex_ST, добрый день. Ясно, буду экспериментировать. Спасибо за помощь!

Источник

Программа Excel входящая в состав офисного пакета Microsoft Office предназначена для работы с электронными таблицами. Программа позволяет создавать и форматировать наборы листов (книги) для анализа данных, создавать формулы для вычислений данных, сводить данные разными способами, а затем отобразить данные на диаграммах различных видов.

Зачастую необходимые для работы данные требующиеся пользователю расположены в разных таблицах и для их отображения нужно открыть поочередно несколько файлов документа Excel. Это несколько неудобно, особенно если файлы расположены в разных местах, поэтому в программе Excel 20072010 предусмотрена функция сохранения рабочей области. При использовании данной функции впоследствии все необходимые файлы Excel открываются одновременно двойным щелчком.

Для этого следует сохранить рабочую область таблиц Excel. Откройте файлы Excel предназначенные для сохранения в виде рабочей области, затем на ленте перейдите на вкладку «Вид» и щелкните по кнопке «Сохранить рабочую область».

Откроется окно сохранения, где укажите место сохранения и имя файла рабочей области. Пункт «Тип файла» оставьте без изменения. Нажмите кнопку сохранить, а затем закройте все файлы, щелкнув по очереди крестики в каждом.

В выбранном месте появится значок.

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

Помните – при перемещении одного из файлов в другое место следует создать новую рабочую область.
———————————————————————————————

Источник

«Сохранить рабочую область» в Excel-2013

iam_alex

Дата: Среда, 18.01.2017, 05:33 |
Сообщение № 1

Группа: Пользователи

Ранг: Новичок

Сообщений: 24

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

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

Excel 2013

Друзья, с 2013 Excel нет возможности сохранять т.н. «рабочую область» в файл .XLW, однако открывать таковые, созданные в предыдущих версиях Excel, можно.
Вопрос такой — каким образом, например макросом, сделать возможным сохранение рабочей области в новых версиях Excel?

Ответить

Roman777

Дата: Среда, 18.01.2017, 08:14 |
Сообщение № 2

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

Ранг: Ветеран

Сообщений: 980

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

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

Excel 2007, Excel 2013

iam_alex, Добрый день!
А просто сохранение активной книги с расширением «.xlw» не проканает?
[vba]

Код

Sub WorkPlace()
Set AWB =ActiveWorkbook
fulpath$ =AWB.Path & «1111.xlw»
AWB.SaveAs Filename:=fulpath
End sub

[/vba]

Много чего не знаю!!!!

Ответить

anvg

Дата: Среда, 18.01.2017, 10:37 |
Сообщение № 3

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

Ранг: Ветеран

Сообщений: 581

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

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

2016, 365

Ответить

iam_alex

Дата: Четверг, 19.01.2017, 06:42 |
Сообщение № 4

Группа: Пользователи

Ранг: Новичок

Сообщений: 24

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

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

Excel 2013

А просто редактировать файл xlw, вписав в него нужные пути как-то можно?

Ответить

anvg

Дата: Четверг, 19.01.2017, 20:54 |
Сообщение № 5

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

Ранг: Ветеран

Сообщений: 581

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

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

2016, 365

А просто редактировать файл xlw, вписав в него нужные пути как-то можно?

Если вы готовы разобрать спецификацию, то вполне возможно. VBA позволяет работать с бинарными данными. Попробуйте. Если получится, то отпишитесь — вдруг кому ещё потребуется?

Успехов.

Ответить

Nic70y

Дата: Четверг, 19.01.2017, 20:57 |
Сообщение № 6

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

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

Сообщений: 8136

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

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

Excel 2010

[offtop]Я так радовался, что отменили эту функцию, что отмечал целую неделю![/offtop]

ЮMoney 41001841029809

Ответить

iam_alex

Дата: Пятница, 20.01.2017, 06:00 |
Сообщение № 7

Группа: Пользователи

Ранг: Новичок

Сообщений: 24

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

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

Excel 2013

я от этого ой как далек)) то есть не существует никакого способа простого чем-то открыть файл xlw и отредактировать?

Ответить

anvg

Дата: Пятница, 20.01.2017, 09:19 |
Сообщение № 8

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

Ранг: Ветеран

Сообщений: 581

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

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

2016, 365

то есть не существует никакого способа простого чем-то открыть файл xlw и отредактировать?

Существует. Только править надо в соответствии с выше приведённой спецификацией — иначе Excel не поймёт

Ответить

Alex_ST

Дата: Пятница, 20.01.2017, 11:33 |
Сообщение № 9

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

Ранг: Участник клуба

Сообщений: 3176

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

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

2003

Ребята, ну если в 2013 мелко-мягкие по каким-то своим соображениям убрали достаточно удобную, имхо, фичу, то ведь вполне можно сделать «протез», функционально заменяющий «ампутированный орган».
Меня-то это не касается, т.к. на моих компах стоит Excel, её поддерживающий.
Но ведь в принципе ничего сложного при вызове функции «Сохранить рабочую область» не делалось:
1. Предлагалось сохранить все открытые книги — нет проблем
2. Спрашивалось куда сохранять файл образа области — нет проблем
3. Сохранялся образ рабочей области в указанной папке в виде файла с расширением «.xlw» — а оно Вам принципиально, с каким расширением будет файл? Вам «шашечки» или «ехать»?
А «.xlsm» Вас устроит? Тогда — нет проблем! В файле на единственном его листе начиная с ячейки А1 запишем ПОЛНЫЕ имена открытых файлов . А в модуле ЭтаКнига на событие Workbook_Open пропишем процедуру открытия всех файлов, перечисленных на листе. Ничего особенно сложного.
P.S. В принципе в конце процедуры можно будет ещё и файл-протез закрыть.
Всё это вполне можно оформить надстройкой.

При открытии этого нашего файла-протеза, заменяющего «.xlw», НА ЛЮБОМ компьютере, даже не «оборудованном» надстройкой, а лишь бы макросы были разрешены, будет выполняться процедура Workbook_Open.

С уважением,
Алексей
MS Excel 2003 — the best!!!

Сообщение отредактировал Alex_ST — Пятница, 20.01.2017, 21:46

Ответить

iam_alex

Дата: Понедельник, 23.01.2017, 06:13 |
Сообщение № 10

Группа: Пользователи

Ранг: Новичок

Сообщений: 24

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

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

Excel 2013

А в модуле ЭтаКнига на событие Workbook_Open пропишем процедуру открытия всех файлов, перечисленных на листе. Ничего особенно сложного.

Это вполне приемлемое решение, т.к. нам «ехать»)) Вот только, если это не сложно для людей, разбирающихся в написании макросов, может быть помогут?) т.к. для меня это — никак(

Ответить

Nic70y

Дата: Понедельник, 23.01.2017, 12:56 |
Сообщение № 11

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

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

Сообщений: 8136

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

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

Excel 2010

[vba]

Код

Private Sub Workbook_Open()
    For Each u In Range(«a1:a100»)
    If u <> «» Then
    Workbooks.Open Filename:=u
    End If
    Next
    ‘ThisWorkbook.Close
End Sub

[/vba]

К сообщению приложен файл:

XLW.xlsm
(12.9 Kb)

ЮMoney 41001841029809

Ответить

Alex_ST

Дата: Понедельник, 23.01.2017, 13:57 |
Сообщение № 12

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

Ранг: Участник клуба

Сообщений: 3176

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

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

2003

Николай, это-то как раз проще всего.
Но сначала нужно:
1) по нажатию на кнопку «Сохранить рабочую область…» в новом файле на листе создать список открытых — это совсем не сложно
2) в модуле ЭтаКнига файла прописать этот (или аналогичный) код обработки события — это не очень сложно, но выше типового уровня, т.к. требует умения работать с VBProject (пример есть у Уокенбаха)
3) запросить куда и под каким именем сохранять этот файл — не сложно
4) сохранить файл — совсем просто.Для тех, кто возьмётся доделывать:
Вот утилита, которая скопированный в буфер обмена с листа VBE текст нужных процедур преобразует в стринг, добавляемый в .CodeModule и помещает его обратно в буфер обмена (публиковал ЗДЕСЬ)

С уважением,
Алексей
MS Excel 2003 — the best!!!

Сообщение отредактировал Alex_ST — Понедельник, 23.01.2017, 14:05

Ответить

Alex_ST

Дата: Понедельник, 23.01.2017, 15:44 |
Сообщение № 13

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

Ранг: Участник клуба

Сообщений: 3176

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

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

2003

Появилось немного свободного времени.
Набросал нужную процедуру:
Размещаете её в Personal. Делаете кнопку для вызова.
Всё, вроде, работает.
Можно бы доделать, но и без этого работает:
— добавить предложение сохранить все открытые файлы
— добавить диалог сохранения файла

С уважением,
Алексей
MS Excel 2003 — the best!!!

Сообщение отредактировал Alex_ST — Понедельник, 23.01.2017, 22:45

Ответить

iam_alex

Дата: Вторник, 24.01.2017, 05:37 |
Сообщение № 14

Группа: Пользователи

Ранг: Новичок

Сообщений: 24

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

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

Excel 2013

Друзья! Спасибо, что откликнулись!!))
Прописал процедуру в Personal, добавил кнопку на панель — запустил (пути прописались) — сохранил книгу как xlsm — открыл с поддержкой макросов — РАБОТАЕТ!!!)))

Единственный момент (вопрос) — при срабатывании процедуры прописываются также пути:

Цитата

C:Users[Username]AppDataRoamingMicrosoftExcelXLSTARTPERSONAL — копия.XLSB
C:Users[Username]AppDataRoamingMicrosoftExcelXLSTARTPERSONAL.XLSB

не обращать внимания?

Ответить

Alex_ST

Дата: Вторник, 24.01.2017, 10:24 |
Сообщение № 15

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

Ранг: Участник клуба

Сообщений: 3176

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

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

2003

iam_alex,
Ну, во-первых разберитесь, почему у Вас в XLSTART лежат и сам файл PERSONAL.XLSB, и его копия? Может быть был когда-то крэш Excel’я и записалась резервная копия?
Во-вторых, в коде явно прописано, что добавлять имя в список нужно только если[vba]

Код

If Split(WBk.Name, «.»)(0) <> «Personal»

[/vba]поэтому PERSONAL.XLSB сохраняться не должно…
Ну, можно попробовать поменять на[vba]

Код

If Not WBk.Name Like «*XLSTARTPersonal*»

[/vba]тогда уж точно не должно.
В общем, пробуйте допиленное со всякими доработками:После отладки апостроф в стринге[vba]

Код

«‘ ThisWorkbook.Close» & vbCrLf & _

[/vba]можно убрать. Тогда файл сохранённой рабочей области закроется сам после того, как откроются все нужные книги

С уважением,
Алексей
MS Excel 2003 — the best!!!

Сообщение отредактировал Alex_ST — Вторник, 24.01.2017, 13:18

Ответить

iam_alex

Дата: Вторник, 24.01.2017, 11:49 |
Сообщение № 16

Группа: Пользователи

Ранг: Новичок

Сообщений: 24

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

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

Excel 2013

допиленное со всякими доработками

теперь при выполнении макроса предлагается сначала сохранить все открытые книги

доходит до сохранения файла (открывается диалоговое окно, присваивается имя типа WorkSpace (2017/01/24 15-46’31») — говорит недопустимое имя файла, оставляю только WorkSpace, выбираю xlsm, вылазит ошибка 1004 — расширение нельзя использовать с выбранным типом файла, жму Debug — показывает на строку WSWBk.SaveAs Filename:=.SelectedItems(1)

Ответить

iam_alex

Дата: Вторник, 24.01.2017, 11:56 |
Сообщение № 17

Группа: Пользователи

Ранг: Новичок

Сообщений: 24

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

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

Excel 2013

затем просто жму сохранить — все сохраняется, конечно. PERSONAL.XLSB все равно присутствует.

Ответить

iam_alex

Дата: Вторник, 24.01.2017, 12:05 |
Сообщение № 18

Группа: Пользователи

Ранг: Новичок

Сообщений: 24

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

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

Excel 2013

и еще по непонятной мне причине макрос Save_WorkSpace я не вижу в списке макросов, соответственно не могу назначить кнопку в панели…

Сообщение отредактировал iam_alex — Вторник, 24.01.2017, 12:21

Ответить

iam_alex

Дата: Вторник, 24.01.2017, 12:12 |
Сообщение № 19

Группа: Пользователи

Ранг: Новичок

Сообщений: 24

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

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

Excel 2013

а еще я пользуюсь таким макросом:

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

но эту уже из разряда хотелок)) хотя может и посчитаете их полезными)
и еще одна хотелка-доработка — если при уже открытых книгах из списка я снова жму открыть, то вполне резонно excel ругается, что не может открыть уже открытые книги, при нажатии на «нет» макрос выдает ошибку. может стоит проверять открыта книга или нет… например могут быть случаи, когда хочешь открыть другую рабочую область, в которой часть файлов совпадает с уже открытыми

Сообщение отредактировал iam_alex — Вторник, 24.01.2017, 12:26

Ответить

Alex_ST

Дата: Вторник, 24.01.2017, 13:16 |
Сообщение № 20

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

Ранг: Участник клуба

Сообщений: 3176

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

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

2003

Что там мелко-мягкие нахимичили в 2013-ом?
С чего это вдруг даётся такое имя ???

WorkSpace (2017/01/24 15-46’31»)

Явно недопустимые символы /
Должно выводить дату с разделителем дня-месяца-года через точку! Типа WorkSpace (2017.01.24 15-46’31»)
Может быть у Вас что-то в системных и регионалных установках не так прописано?
Попробуйте при любой открытой книге Excel нажать Alt+F11 , потом Ctrl+G В открывшееся окно Immediate Window введите текст:[vba]

Код

? Format(Now, «yyyy/mm/dd hh-mm’ss»»)

[/vba]В ответ должны получить что-то типа:[vba][/vba]
Если же всё-таки разделители будут на ТОЧКА, а СЛЭШ, то попробуйте там же ввести[vba]

Код

? Format(Now, «yyyy.mm.dd hh-mm’ss»»)

[/vba]если получите нормальный вид с ТОЧКАМИ между годом, месяцем и днём, то поправьте соответственно в задании переменной:
вместо[vba]

Код

Dim sFileName$: sFileName = «WorkSpace (» & Format(Now, «yyyy/mm/dd hh-mm’ss»») & «).xls»

[/vba]напишите [vba]

Код

Dim sFileName$: sFileName = «WorkSpace (» & Format(Now, «yyyy.mm.dd hh-mm’ss»») & «).xls»

[/vba]Или если лень, просто перекачайте процедуру из моего предыдущего поста — я там поправил.
——————————
А не видно её в макросах потому, что процедура декларирована как Private Sub , а не просто Sub как раз для того, чтобы не «светилась» в макросах
Чтобы назначить её на кнопку удалите слово Private . Она появится в Макросах.
После назначения можете его поставить обратно.
———

С уважением,
Алексей
MS Excel 2003 — the best!!!

Сообщение отредактировал Alex_ST — Вторник, 24.01.2017, 13:54

Ответить

Источник