VBA儲存檔案
在Excel中我們想要儲存檔案,可以點選檔案–儲存檔案或是按下快捷鍵「Ctrl」+「S」,那要如何使用VBA儲存檔案呢?
輸入巨集
※輸入以下指令※
Sub 儲存檔案()
ThisWorkbook.save
End Sub
語法說明
ThisWorkbook.save
‘此活頁簿儲存
執行巨集
點選「開發人員」-「巨集」或按下「Ctrl」+「F8」快捷鍵,並「執行」巨集。
執行後即儲存檔案。
VBA另存新檔
在Excel中我們想要儲存檔案,可以點選檔案–另存新檔或是按下快捷鍵「F12」,那要如何使用VBA另存新檔呢?
輸入巨集
※輸入以下指令※
Sub 另存新檔()
ThisWorkbook.SaveAs Filename:=ThisWorkbook.Path & “\檔案名稱.xlsm”
End Sub
語法說明
ThisWorkbook.SaveAs
‘此活頁簿另存新檔為
Filename:=ThisWorkbook.Path & “\檔案名稱.xlsm”
‘儲存在同活頁簿所在的位置,並以「檔案名稱」為檔名,「xlsm」為副檔名。
「檔案名稱」可輸入想命名的名稱。
「xlsm」為Excel啟用巨集活頁簿的副檔名
「xlsx」為Excel 活頁簿的副檔名(版本2007以上)
「xls」為Excel 活頁簿的副檔名(版本2003)
執行巨集
點選「開發人員」-「巨集」或按下「Ctrl」+「F8」快捷鍵,並「執行」巨集。
執行後即另存檔案為「檔案名稱」,且檔案位置同此活頁簿。