怎么使用VBA代碼實(shí)現(xiàn)excel文檔每天自動(dòng)備份
實(shí)現(xiàn)這樣“高大尚”的功能現(xiàn)有的excel功能無(wú)法完成，還得VBA編程的方法。當(dāng)然，作為不懂VBA代碼的你，只需要按下面步驟復(fù)制粘貼即可。
第1 步：打開要備份的excel文件，在工作表標(biāo)簽上右鍵單擊，點(diǎn)擊“查看代碼”。
第2步 在打開一個(gè)visualbasic窗口，雙擊工程窗口中的thisworkbook，把下面的代碼粘貼到右側(cè)的窗口中。
代碼：
Private Sub Workbook_BeforeClose(Cancel As Boolean)
On Error Resume Next
Dim mypath As String, fname As String
fname = Format(Date, "yymmdd") & ThisWorkbook.Name
mypath = ThisWorkbook.Path & "/備份/"
ThisWorkbook.SaveCopyAs mypath & fname
End Sub
第3步：在Visual basic窗口中點(diǎn)擊保存命令，會(huì)彈出另存啟用宏的提示，這時(shí)點(diǎn)擊“否”按鈕。
在彈出的保存窗口中，選取保存類型為“Excel 啟用宏的工作簿”。
第4步：在當(dāng)前文件夾中，新建一個(gè)名為“備份”的文件夾。
