Question

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

Answer 1

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

追问

日期不是当天的,但是都是规则的,类似排序,2017.3.17 2017.3.16 2017.3.15依次排下来

Answer 2

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

追问

怎么在宏程序模块编程里,实现自动替换模块里的字符,我说的是宏程序模块里的字符,不是表格里的的字符

追答

你想将什么替换为什么
你这是在对我的回答追问吗？

追问

感觉你比较专业问了你这个问题，我就想在编程模块里把 2017.3.16金马异常 替换成2017.3.15金马异常，我不想用编辑里的替换，怎么在编程语言里实现替换'

追答

不明白你的意思，编程模块里替换和编辑器里替换有什么区别吗？要不就设计成每次运行程序时弹出对话框，手动填入日期。否则没法自动替换，也不知道你的文件名到底什么规律