怎么在保存文件的时候自动添加日期

答案:2 悬赏:0 手机版

解决时间 2021-01-30 16:41

提问者网友：趣果有间
2021-01-30 11:11

每天有大量的word excel 文件是否能有这个功能就在保存的时候自动加上当天的日期我们保存文件的时候一般默认都是doc1.doc 我弄成默认为doc120071012.doc 日期每天自动会更新的

最佳答案

五星知识达人网友：詩光轨車
2021-01-30 12:20

1、你说的是在word名的后面添加吗？
2、其实word中有个“版本”的功能，好像是多个版本都保存在一个word文件中，虽然不能达到你的要求，但可能解决问题，具体可以上网搜索一下，或者自己摸索，我也没有用过。

全部回答

1楼网友：笑迎怀羞
2021-01-30 13:09

alt+f11 复制以下宏 sub macro1() dim myfilename as string myfilename = format(date, "yyyy/m/d ", vbsunday, vbusesystem) myfilename = myfilename + ".doc" changefileopendirectory "c:\" activedocument.saveas filename:=myfilename, fileformat:=wdformatdocument, _ lockcomments:=false, password:="", addtorecentfiles:=true, writepassword _ :="", readonlyrecommended:=false, embedtruetypefonts:=false, _ savenativepictureformat:=false, saveformsdata:=false, saveasaoceletter:= _ false end sub 想要保存时 alt+f8，运行macro1宏即可。注意：上面宏默认保存到c:\下，可根据自己的意愿将保存位置更改方法：把上面 changefileopendirectory "c:\" 中的c:\替换为其他位置

我要举报

如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！

点此我要举报以上问答信息