导航:首页 > 文件类型 > word文件名怎么加上日期

word文件名怎么加上日期

发布时间:2023-11-15 06:14:50

『壹』 如何在word文件名下方显示修改日期

你好!
你可以在页脚备注显示当天日期的.
创建日期和修改日期在WORD文档的属性里可以看到.

『贰』 如何用批处理修改文件名,将指定的文字与当前日期添加到文件名中

@echo off
rem 将当前目录下.txt文件名修改成“源文件名+word+当前扮顷日期.原扩展名”,包括子目录
set d=%date:/好握=-%
set d=%date:-=%
set d=%d:~0,-4%
for /f "delims=*" %%i in ('dir /s/b/a-d *.txt') do ren "%%i"厅袜陆 "%%~niword%d%%%~xi"

即123.txt --> 123word20100401.txt
即abc\123.txt --> abc\123word20100401.txt

补充回答
后缀不限
@echo off
set d=%date:/=-%
set d=%date:-=%
set d=%d:~0,-4%
for /f "delims=*" %%i in ('dir /s/b/a-d *.txt') do ren "%%i" "%%~niword%d%.xxx"

『叁』 如何在word文件的名字后面加上创建日期有很多word文件需要将创建日期加到文件名后面去

帮你写一个批处理,未测试,你先复制几个到一文件夹试:
打开记事本,版把下面代码权贴进去,另存为(选任意型)xx.bat 放在要处理的一批文件同位置,双击运行
@echo off&setlocal enabledelayedexpansion
echo 正在重命名...
for /f "skip=5 tokens=1,3*" %%i in (
'dir/a-d/tc *.doc^|findstr/v "个.*字节"')do (
echo .%%k&set/a n+=1
set ft=%%k
set ft=!ft:-=!
ren "%%k" "%%~nk!ft!%%~xk")
echo.共 %n% 个文件已重命名
pause

『肆』 如何实现保存 文件名有日期

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文件名后面自动添加时间

WORD文件名后面自动添加时间方法如下:

(1)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

(2)ALT+F8保存,运行MACRO1宏即可。

『柒』 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”(前缀“我的日志”可以在上面代码中修改)。

阅读全文

与word文件名怎么加上日期相关的资料

热点内容
qq卸载过后之前的文件都找不到了 浏览:586
如何在ppt中做动态数据大屏 浏览:272
火狐上传不了文件夹 浏览:897
神州a460设置开机密码 浏览:615
linux更改系统版本 浏览:463
美行车载导航路径文件 浏览:417
如何搭建网站的用户中心 浏览:424
u大师找不到isos镜像文件 浏览:408
小象编程的草稿都存在哪里 浏览:877
重要文件关机后找不到了怎么办 浏览:293
如何将数据库文件导出为excel 浏览:654
怎么找到压缩文件夹位置 浏览:647
pe模式找不到安装文件 浏览:858
iphone6s设置开机密码 浏览:783
now直播16版本 浏览:330
把文件夹拖到u盘找不到了 浏览:549
苹果手机桌面文件夹怎么删除怎么恢复软件 浏览:179
win10文件多大 浏览:518
买羽毛球装备用哪个app 浏览:202
豪华钓鱼安卓版 浏览:787

友情链接