+ -
当前位置:首页 → 问答吧 → word里如何实现回车即自动添加时间?

word里如何实现回车即自动添加时间?

时间:2010-12-18

来源:互联网

各路高手,请您们帮助弟解决一下这个问题:
把word当成是一个记事本,或者是速记本,每打一段话,回车换行时,则下一行自动添加上当前时间,如:

9:30 AM  这是第一行测试
9:32 AM 这是第二行测试
9:35 AM 这是第三行测试

只有添加硬回车时,下一行行首自动插入当前时间,并且该时间不能自动更新,保存为历史时间!

不知我说的意思各位是否清楚,谢谢各位!!!

作者: my872   发布时间: 2010-12-18

引用:
原帖由 my872 于 2010-12-18 22:27 发表
各路高手,请您们帮助弟解决一下这个问题:
把word当成是一个记事本,或者是速记本,每打一段话,回车换行时,则下一行自动添加上当前时间,如:

9:30 AM  这是第一行测试
9:32 AM 这是第二行测试
9:35 AM 这是第三行测 ...
有点小遗憾,Word内置命令中没有直接提供插入段落标记的命令(或许我没有找到)。请将以下代码粘贴于目标文档的VBA工程中(如Thisdocument类模块中)或者标准模块中。
'''''修改Word命令
Sub InsertPageBreak()
    Selection.InsertAfter Chr$(13) & Format$(Now, "hh:mm:ss") & ChrW$(12288)
    Selection.EndKey Unit:=wdLine, Extend:=wdMove
End Sub

在文档中按下<Ctrl+Enter>组合键时,可以达到楼主的需求。

作者: 守柔   发布时间: 2010-12-20