191问答库 > 我使用EXCEL宏,但是每次执行都要在宏程序里修改一次文件日期才行,有什么方法可以简单化一下不用那么麻烦

我使用EXCEL宏,但是每次执行都要在宏程序里修改一次文件日期才行,有什么方法可以简单化一下不用那么麻烦

2025-03-29 06:50:31

推荐回答（2个）

回答1：

前提是你这个文件日期是每天都有吗？
如果是这样，可以用year(now())&"."&month(now())&"."&day(now())&"金马异常.xls"
拼接成文件名
另外一种方式是你直接在单元格内输入文件名，前面的地址都不变最后拼接这个单元格的值。

回答2：

可以把程序第一条语句换成下面3句，用对话框来选择。
getfile = Application.GetOpenFilename(filefilter:="Excel文件(*.xls;*.xlsx),*.xls;*.xlsx", Title:="选择一个文件", MultiSelect:=False)
If getfile = False Then Exit Sub
Workbooks.Open Filename:=getfile