[已解决]VBA公文落款大写日期“二○一一年十月二十一日”怎么写？

413191246se · 发表于 2011-10-21 11:44

本帖最后由 413191246se 于 2011-10-22 10:15 编辑

我用 Selection.TypeText Text:=Format(Date, "yyyy年m月d日") 语句在 WORD 2003 中可以插入当前日期“2011年10月21日”，但公文格式中落款要“二○一一年十月二十一日”这种形式，该怎么办呢？要求必须是插入每日系统当前日期，不能是域的形式。——请各位大侠、高手解决，3Q！

changxuegu · 发表于 2011-10-21 12:16

Selection.InsertDateTime "EEEE年O月A日"

sylun · 发表于 2011-10-21 14:34

添加一个参数“false”则用文本形式插入，即：Selection.InsertDateTime "EEEE年O月A日", False

413191246se · 发表于 2011-10-22 00:49

非常感谢 changxuegu 和 sylun 两位朋友的回答！——经过过了12点后试验，经过反复设置自己电脑的系统时间为各个年份、月份、日期，证明 sylun 的方法是正确的；而 changxuegu 的方法，因为还是域，这样的话，每次一打开文档就会提示保不保存，所以，不能采取以域的形式插入时间的方法，必须是文本方式，无论什么时候打开公文，日期都不再变化。——已经将语句放入“公文”VBA宏中……3Q

jjn21 · 发表于 2015-5-27 17:06

给完整一点的代码吧，拜托

ke3088 · 发表于 2015-5-28 08:51

国标GB/T 9704-2012《党政机关公文格式》中的7.3.5.4　成文日期的数字　用阿拉伯数字将年、月、日标全，年份应标全称，月日不编虚位（即1为编为01）。

		自动登录	找回密码
密码			免费注册

[求助] [已解决]VBA公文落款大写日期“二○一一年十月二十一日”怎么写？