Excel 是否在保存电子表格时根据单元格数据自动命名文件?
我有一个.xltm模板电子表格,我想知道我是否可以得到一个宏来根据单元格数据填充“另存为”文件名,这可能吗 有50多人将拥有这个电子表格,它更像是一种形式,我们正试图找出一种保持文件名统一的方法。我知道在保存之前有ThisWorkbook.BeforeSave,但我在那里运气不好。我只需要它来制作一个名为Excel 是否在保存电子表格时根据单元格数据自动命名文件?,excel,vba,Excel,Vba,我有一个.xltm模板电子表格,我想知道我是否可以得到一个宏来根据单元格数据填充“另存为”文件名,这可能吗 有50多人将拥有这个电子表格,它更像是一种形式,我们正试图找出一种保持文件名统一的方法。我知道在保存之前有ThisWorkbook.BeforeSave,但我在那里运气不好。我只需要它来制作一个名为$a$1r$B$1t$B$3.xlsx的文件 有什么办法吗?当然 Sub SaveMyWorkbook() Dim strPath As String Dim strFolde
$a$1r$B$1t$B$3.xlsx的文件
有什么办法吗?当然
Sub SaveMyWorkbook()
Dim strPath As String
Dim strFolderPath as String
strFolderPath = "C:\"
strPath = strFolderPath & _
Sheet1.Range("A1").Value & "R" & _
Sheet1.Range("B1").Value & "T" & _
Sheet1.Range("B3").Value & ".xlsx"
ActiveWorkbook.SaveAs Filename:=strPath
End Sub
编辑:在你在下面的评论中澄清了你的问题之后,我现在可以有把握地说答案是:不,你所问的是不可能的
可以在工作表上放置一个大而胖的命令按钮,上面写着“按我保存”,然后让该按钮调用上面的子按钮。您可以设置一个固定文件夹,如上面的示例所示,或者让用户使用文件对话框
对象选择一个文件夹(或者使用GetSaveAsFilename
函数,但是用户可以更改建议的文件名,因此不太安全).我知道如何在VBA中保存文件,我想要的是在最终用户单击“保存”或“另存为”时自动命名该文件,而不仅仅是保存一份副本并仍打开该文件。编辑答案以解决您的澄清。