用EXCEL VBA 解决文件自动备份问题

第三步：双击“thisworkbook”，在右边的大框中输入如下程序代码段：

Private Sub Workbook_BeforeClose(Cancel As Boolean)

Workbooks('冯涛.xls').SaveAs 'd:\冯涛.xls'

End Sub

大功告成，保存关闭文件即可。以后您再也不必为忘记备份文件而发愁了。因为只要您修改了这个名为“冯涛”的EXCEL文件，计算机就会自动将修改结果保存到D盘。

需要说明的的：冯涛.xls为您的EXCEL文件名，可以修改，”d:\”为您需要备份的文件目标目录，也可以修改。