ActiveWorkbook.SaveAs Filename:= _
"C:\Documents and Settings\Owner\桌面\学习" & date & ".xls", FileFormat:=xlNormal, _
Password:="", WriteResPassword:="", ReadOnlyRecommended:=False, _
CreateBackup:=False
这个你保存文件的时候用date函数获取日期不就行了么？！
filename="学习" & cstr(date) & ".xls"
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ：24596024