如何根據儲存格的值來儲存 Excel 檔案？

當您使用工作簿時，是否曾經想過要根據儲存格內容來儲存 Excel 檔案呢？例如，您在 A1 儲存格中有「售價」，而您希望將工作簿以「售價」為名進行儲存。當然，您可以將名稱輸入到「另存新檔」對話框中，然後再進行儲存。但這在大量工作的情況下會是一種效率低下的方法。今天，我將介紹一個快速解決這個問題的小技巧。

使用 VBA 程式碼根據特定儲存格值儲存 Excel 檔案

使用 VBA 程式碼根據特定儲存格值儲存 Excel 檔案

以下的 VBA 程式碼可能幫助您根據指定的儲存格值來儲存您的工作簿，請按照以下步驟操作：

1. 按住 ALT + F11 鍵打開 Microsoft Visual Basic for Applications 視窗。

2. 點擊 插入 > 模組，並將以下程式碼貼到模組視窗中。

VBA 程式碼：根據特定儲存格值儲存 Excel 檔案

Private Sub filename_cellvalue()
'Updateby Extendoffice
Dim Path As String
Dim filename As String
Path = "C:\Users\dt\Desktop\my information\"
filename = Range("A1")
ActiveWorkbook.SaveAs filename:=Path & filename & ".xls", FileFormat:=xlNormal
End Sub

3. 然後按下 F5 鍵執行該程式碼，您的工作簿將被命名為 A1 儲存格中的內容。請參見截圖：

注意：

1. 您可以通過修改上述程式碼中的 A1 至其他儲存格引用，將任何儲存格的值指定為檔案名稱。

2. 您當前的工作簿將被保存到 C:\Users\dt\Desktop\my information\（最後的斜線必須保留，當您替換位置時）位置，您可以根據需要更改路徑。

相關文章：

如何在 Excel 中使用日期和時間儲存檔案？

如何在 Excel 的標題欄或工具欄中顯示檔案路徑？