如何用單元格數(shù)據(jù)作為Excel工作簿名稱

如何用單元格數(shù)據(jù)作為Excel工作簿名稱

　　Excel中，通常用Book1、Book2……作為工作簿名稱。能不能讓Excel采用我們選定的某個單元格中的數(shù)據(jù)做為工作簿名稱來保存文檔呢?答案是肯定的。

　　1、啟動Excel，執(zhí)行“工具→宏→Visual Basic 編輯器”命令，進入VBA編輯狀態(tài)。

　　2、在左側(cè)的“工程資源管理器”窗口中，選中“VBAproject(PERSONAL.XLS)”(個人宏工作簿)選項。

　　3、執(zhí)行“插入→模塊”命令，插入一個模塊(模塊1)。

　　4、將下述代碼輸入到右側(cè)的代碼編輯窗口中：

　　Sub baocun() lj = InputBox("請輸入文檔保存路徑") ActiveWorkbook.SaveAs Filename:=lj & ActiveCell.Value & ".xls" End Sub

　　退出VBA編輯狀態(tài)。

　　5、以后要保存某個工作簿文檔時，先選中作為名稱的字符所在的單元格，然后執(zhí)行“工具→宏→宏”命令，打開“宏”對話框。

　　6、選中剛才編輯的宏(PERSONAL.XLS!baocun)，單擊“執(zhí)行”按鈕，系統(tǒng)彈出對話框。

　　7、輸入保存文檔的路徑(如“E:office技巧”)，單擊“確定”按鈕。

　　文檔保存成功

　　注意：如果不需要保存路徑，文檔將被保存到“我的文檔”文件夾中。