Сохранить файл Excel в двух разных местах?

Можно ли сохранить файл Excel в обоих моих C: диск и на флешку одновременно при нажатии CTRL + S?

Благодарю.

2 ответа

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

Макрос VBA для сохранения файла Excel, используя путь из ячейки

Вы можете перехватить макрос Save with Event:

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
    Cancel = True
    Application.EnableEvents = False
        ThisWorkbook.SaveAs Filename:="F:\Transfer\temp.xlsm"
        ThisWorkbook.SaveAs Filename:="C:\TestFolder\temp.xlsm"
    Application.EnableEvents = True
    MsgBox "Dual save performed"
End Sub

Но вам нужно будет настроить спецификации файлов в соответствии с вашими делами.

Поскольку это код рабочей книги, его очень легко установить и использовать:

  1. щелкните правой кнопкой мыши на крошечном значке Excel слева от элемента "Файл" в строке меню.
  2. выберите View Code - откроется окно VBE
  3. вставьте материал и закройте окно VBE

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

Чтобы удалить макрос:

  1. вызвать окна VBE, как указано выше
  2. очистить код
  3. закройте окно VBE

Чтобы узнать больше о макросах в целом, смотрите:

http://www.mvps.org/dmcritchie/excel/getstarted.htm

а также

http://msdn.microsoft.com/en-us/library/ee814735(v=office.14).aspx

Чтобы узнать больше о макросах событий (код книги), см.:

http://www.mvps.org/dmcritchie/excel/event.htm

Макросы должны быть включены, чтобы это работало!

EDIT # 1:

Если вы сначала откроете окно VBE, то вот как открыть область кода рабочей книги:

Другие вопросы по тегам