导航:首页 > 文件类型 > 文件名怎么自动获取日期

文件名怎么自动获取日期

发布时间:2024-05-28 04:54:23

word保存时,如何在文件名上自动添加保存的日期、时间

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:\替换为其他位置

② 如何在WORD文件名后面自动添加时间

1、首先需要确保Word的宏安全性设置至少为“中”(工具-宏-安全性-中)。
2、在Word里面新建一个空白文档,给它随便取个名字(比如“我的日志”)保存一下——这个文档就是你以后日志文档的开端了!(注意,如果你用的是Word 2007的话,需要保存为启用宏的文档*.docm)
3、键入ALT+F11打开VBA编辑窗口,键入CTRL+R激活左边的“工程 – Project”面板;
4、双击工程面板中的“Project (我的日志)\Microsoft Word 对象\ThisDocument”打开代码窗口;粘贴如下代码进去:
Option Explicit
Dim oLogFileCreator As LogFileCreator
Private Sub Document_Open()
On Error Resume Next
Set oLogFileCreator = New LogFileCreator
Set oLogFileCreator.WordApplication = Application
End Sub
Private Sub Document_Close()
On Error Resume Next
Set oLogFileCreator.WordApplication = Nothing
Set oLogFileCreator = Nothing
End Sub
5、选择菜单“插入-类模块”,然后在工程面板里双击这个刚生成的“Project (我的日志)\类模块\类1”,粘贴如下代码进去:
Option Explicit
Public WithEvents WordApplication As Word.Application
' 根据需要修改下面引号中的内容作为你日子文件的默认前缀
Private Const c_strFileNamePrefix = "我的日志_"

Private Sub WordApplication_DocumentBeforeSave(ByVal Doc As Document, SaveAsUI As Boolean, Cancel As Boolean)
On Error Resume Next
Dim fso As Object
Dim strOldName As String, strNewName As String
Set fso = CreateObject("Scripting.FileSystemObject")
strOldName = ActiveDocument.FullName
strNewName = fso.BuildPath(fso.GetParentFolderName(strOldName), Format(Now, c_strFileNamePrefix & "yyyy-mm-dd.") & fso.GetExtensionName(strOldName))
If UCase(strNewName) <> UCase(strOldName) Then
ActiveDocument.SaveAs strNewName
fso.DeleteFile strOldName
Cancel = True
End If
Set fso = Nothing
End Sub
6、可以根据需要修改代码中的日志文件名前缀。默认的日志文件名是类似 “我的日志_2009-09-12”这样的形式。
7、键入F4打开属性面板,在里面把“(名称)”从“类1”改为“LogFileCreator”。
8、键入ALT+Q关闭VBA编辑窗口返回Word文档窗口,保存,关闭。
9、再次重新打开这个文档,如果Word提示是否启用宏,选择启用。
10、现在你的这个自动按日期保存的日志就可以正常运作了。每次你做完修改后,只要你一保存,它就会根据今天的日期自动把文档保存成类似这样的形式“我的日志_2009-09-12”(前缀“我的日志”可以在上面代码中修改)。

linux中怎样从文件名里提取一个日期,比如:aewf_2015060201.nc中把日期提取出来

大致思路是
ls-ahl l >a.txt
查看文件当前文件目录 将文件的当前路径用重定向写入文件
用正则处理文件内容

可能有更简单的

④ 如何在word文档和Microsoft Excel工作表的文件名后自动加上创建日期

文件自动更名器
网络搜索下载这个软件就行,可以按你指定的各种要求批量更改文件名

阅读全文

与文件名怎么自动获取日期相关的资料

热点内容
js二维数组序列化 浏览:287
一加7t视频存在哪个文件 浏览:361
qq游戏照片秀 浏览:242
数据分析如何入行 浏览:296
plc编程d4z0什么意思 浏览:330
linux句柄数和文件打开数 浏览:434
生疹子血液数据会有什么变化 浏览:964
模拟人生3安卓没有授权 浏览:849
编程学什么专业比较适合女生 浏览:947
网络歌曲点击率最高的是什么歌 浏览:611
苹果的平板appstore怎么换密码 浏览:330
javascript有几种数据类型 浏览:842
数学可以但是编程能力很渣怎么办 浏览:266
数控车床刚性班牙如何编程 浏览:370
在ps中生成的文件格式是 浏览:102
找模特平台app有哪些 浏览:438
office3652016激活工具 浏览:857
现实中的数据说明什么 浏览:15
三星q330拆机教程 浏览:597
pmp转换器找不到文件 浏览:8

友情链接