当前位置:首页教育技巧word技巧word基础知识

如何改变word修改时间,改变,修改,时间

减小字体 增大字体 2025-01-15 09:18:22


1.怎样修改word文档的创建日期

方法一:(移花接木) 通过将当前的系统日期调整为你希望的日期,然后把文档复制一份,这样这份文档的复制品的创建日期就是你希望的日期了 方法二:(干将莫邪) 利用外部工具,比如TouchPro这样的软件来修改时间。

TouchPro就是一款运行于Windows下的时间属性修改工具。TouchPro安装后集成于资源管理器右键菜单,它不占用任何系统资源,支持多级目录与隐藏文件的时间属性批量修改。

选中文件或目录后选择鼠标右键菜单中的“TouchPro”即可按你指定的时间格式快速将创建时间、修改时间和访问时间设置为你指定时间或当前时间。

2.怎样批量修改word的创建时间、修改时间

普通的替换恐难完成任务,一个网友曾经写过一段宏代码,你试试好不好使。

打开Word文档后,按“Alt+F11”进入VBE,在左侧工程管理器中,选中“Normal”,然后点上面的“插入”菜单下的“模块”,在右下侧的编辑窗口中输入如下代码:

'=========代码复制开始============

Sub 替换日期()

Dim objRegExp As Object, matches As Object, match As Object, retStr$

Set objRegExp = CreateObject("VBScript.RegExp") '建立正则表达式对象

With objRegExp

.Pattern = "(\d{1,2})\/(\d{1,2})\/(\d{4})" '匹配日期字符串

.IgnoreCase = True

.Global = True

Set matches = .Execute(ActiveDocument.Content)

End With

Application.ScreenUpdating = False

With ActiveDocument.Content.Find

For Each match In matches '遍历Matches集合

.ClearFormatting

.Replacement.ClearFormatting

.Text = match.Value

.Replacement.Text = match.submatches(2) & "年" & match.submatches(0) & "月" & match.submatches(1) & "日"

.Forward = True

.Wrap = wdFindContinue

.Execute Replace:=wdReplaceOne

Next

End With

Application.ScreenUpdating = True

Set objRegExp = Nothing

End Sub

'=========代码复制结束============

完成后关掉VBE窗口,回到Word文档,按下“Alt+F8”组合键,运行“替换日期”宏就可以了。

评论评论内容只代表网友观点,与本站立场无关!

   评论摘要(共 0 条,得分 0 分,平均 0 分)

【免责声明】本站信息来自网友投稿及网络整理,内容仅供参考,如果有错误请反馈给我们及时更正,对文中内容的真实性和完整性本站不提供任何保证,不承但任何责任。
版权所有:学窍知识网 Copyright © 2011-2025 www.at317.com All Rights Reserved .