Автосохранение

[A_L_E_X]

После ряда аварийных отановок компа слепил из разных источников макрос, который сохраняет все открытые книги с заданным периодом.

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

Может, кто подскажет, как решить проблему?

[IgorGO]

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

[A_L_E_X]

Не правда это.

[IgorGO]

а что, по Вашему, делает этот

  For Each W In Application.Workbooks
    W.Save
  Next W

[A_L_E_X]

Возможно, я не очень точно сформулировал.
Когда открыта книга. в которой сидит макрос - все работает.
Если она закрыта - нет.
Если посадить макрос во все книги - будет одно сплошное самосохранение, т.е. - бардак.
Случайно выставил время 00:00:00 - долго любовался процессом.
Хорошо, что все происходило в тестфайле...

[IgorGO]

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

[A_L_E_X]

Если не затруднит - по-подробнее про этот файл.

А насчет встроенного автосохранения - у меня все книги с ним - 5 мин.
Однако, когда комп повис (а книги не трогал около получаса), пришлось давить большую кнопку.
Потом делать чек.
И ничего не сохранилось.

Потом сделал тестовый файл, ввел цифру в ячейку, покурил, покурил, еще покурил и закрыл файл без сохранения.
Открыл - цифры нет.

Или я совсем тупой?

[IgorGO]

нажмите в Excel F1, напишите в строку поиска PERSONAL и почитайте, что это за файл, как его создать, как добавить в него макрос и прочее, я лучше чем в справке Excel не расскажу

[A_L_E_X]

Спасибо.
На другом форуме (по моей проф.деятельности) в таких случаях рекомендуют яндекс или гугл.


Создание макроса
Запись макроса

Установите Средний или Низкий уровень безопасности.

Инструкции

В меню Сервис выберите команду Параметры.
Откройте вкладку Безопасность.
В группе Безопасность макросов нажмите кнопку Безопасность макросов.
Откройте вкладку Уровень безопасности, а затем выберите нужный уровень безопасности.
Выберите в меню Сервис команду Макрос и подкоманду Начать запись.
В поле Имя макроса введите имя макроса .
Примечания

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

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

Если этот макрос потребуется запускать нажатием сочетания клавиш на клавиатуре, введите букву в поле Сочетание клавиш. Допускается использование сочетаний CTRL+ буква (для строчных букв) или CTRL+SHIFT+ буква (для прописных букв), где буква — любая буквенная клавиша на клавиатуре. Нельзя использовать сочетания клавиш с цифрами и специальными знаками, такими как @ или #.
Примечание. Выбранное сочетание клавиш заменяет все совпадающие стандартные сочетания клавиш Microsoft Excel на то время, пока открыта книга, содержащая данный макрос.

В поле Сохранить в выберите книгу, в которой требуется сохранить макрос.
Если этот макрос требуется всегда при работе в Microsoft Excel, выберите вариант Личная книга макросов.

Если необходимо добавить описание макроса, введите его в поле Описание.

Нажмите кнопку OK.
Если макрос требуется выполнять относительно позиции активной ячейки, запишите его, используя относительные ссылки на ячейки. На панели инструментов Остановить запись нажмите кнопку Относительная ссылка , чтобы она осталась нажатой. Запись макроса будет продолжена с использованием относительных ссылок, пока не будет закрыт Microsoft Excel или не будет еще раз нажата кнопка Относительная ссылка , после чего она останется не нажатой.

Выполните макрокоманды, которые нужно записать.
На панели инструментов Остановить запись нажмите кнопку Остановить запись .
Создание макроса с использованием Microsoft Visual Basic

В меню Сервис Microsoft Excel выберите команду Макрос, а затем — Редактор Visual Basic.
В меню Insert выберите команду Module.
Введите или скопируйте программу в окно программы модуля.
Чтобы запустить данный макрос из окна модуля, нажмите кнопку F5.
Когда макрос будет создан, выберите команду Close and Return to Microsoft Excel в меню File.
Создание макроса, выполняемого при запуске

Автоматические макросы (Макрос. Макрокоманда или набор макрокоманд, используемый для автоматического выполнения некоторых операций. Макросы записываются на языке программирования Visual Basic для приложений.), такие как Авто_активизировать, выполняются при запуске Microsoft Excel. Для получения дополнительных сведений см. справку по Microsoft Visual Basic (Справка Microsoft Visual Basic. Чтобы получить справку по Visual Basic в Microsoft Excel, выделите в меню Tools пункт Macro и выберите команду Visual Basic Editor. В меню «Help» выберите команду Microsoft Visual Basic Help.).

Копирование части макроса для создания другого макроса

Установите Средний или Низкий уровень безопасности.
Инструкции

В меню Сервис выберите команду Параметры.
Откройте вкладку Безопасность.
В группе Безопасность макросов нажмите кнопку Безопасность макросов.
Откройте вкладку Уровень безопасности, а затем выберите нужный уровень безопасности.
Откройте книгу, содержащую макрос, который нужно скопировать.
В меню Сервис выберите пункт Макрос, а затем выполните команду Макросы.
В поле Имя макроса введите имя того макроса, который нужно скопировать.
Нажмите кнопку Изменить.
Выделите строки макроса, которые нужно скопировать.
При копировании всего макроса целиком убедитесь, что строки Sub и End Sub включены в выделенную область копирования.

На стандартной панели инструментов нажмите кнопку Копировать .
Переключитесь в модуль, в который нужно вставить скопированные строки.
Нажмите кнопку Вставить .
Совет

Файл личной книги макросов (Personal.xls) можно просмотреть в любой момент, открыв его в редакторе Visual Basic (Alt+F11). Поскольку Personal.xls является скрытой книгой, которая всегда открыта, необходимо сделать ее доступной, если требуется копировать макрос.

И что дальше.

[VictorM]

A_L_E_X, зачем же цитировать всю справку на форуме?
А по сути вопроса:

И что дальше.

Дальше помещаете свой макрос в эту книгу, как говорил IgorGO.
Теперь он будет доступен из любой книги Excel.