سام پرسید که آیا راهی برای ذخیره همان ورک بوک در دو مکان جداگانه وجود دارد؟ به عنوان مثال، یک کپی را می توان در محل معمولی شبکه ذخیره کرد و دیگری را در پوشه ای در هارد دیسک محلی ذخیره کرد.
راه های مختلفی وجود دارد که می توان این کار را انجام داد. به عنوان مثال، می توانید ماکرو خود را ایجاد کنید که دو نسخه از یک ورک بوک را ذخیره می کند. ماکرو را می توان در نوار ابزار دسترسی سریع قرار داد و زمانی که می خواهید هر دو کپی را ذخیره کنید، روی آن کلیک کنید. (به عبارت دیگر، شما تابع Save معمولی را با هم دور خواهید زد.)
روش دیگر این است که یک تنظیم کوچک در نحوه ذخیره اکسل ورک بوک انجام دهید. به عنوان مثال، ماکرو زیر به شی ThisWorkbook برای ورک بوک اضافه می شود:
Private Sub Workbook_BeforeSave(ByVal _
SaveAsUI As Boolean, Cancel As Boolean)
With ThisWorkbook
.SaveCopyAs ("c:BackupsBackup of " & .Name)
End With
End Sub
این یک کنترل کننده رویداد است و هر بار که برای ذخیره در ورک بوک می روید فعال می شود. در آن مرحله، ماکرو اجرا می شود و یک کپی از ورک بوک در مسیر مشخص شده در هارد دیسک محلی شما ذخیره می شود.
