如何在excel里一次在30个工作表中输入1日-30日的日期

honggexjq · 发表于 2011-1-5 15:49

VBA可以很方便地实现
用函数的话
定义名称
aa=get.document(1)
bb=get.workbook(1)
利用shift键一次选中这30张表，在单元格里输入=TEXT("1/1"+MATCH(aa,bb,)-1,"m月d日")即可

江南民谣 · 发表于 2011-1-5 16:05

不用VBA也可以实现，步骤：
1、将30张表分别按1、2、3、。。。30名称命名。
2、用SHIFT全选所有表，插入名称a，且a=REPLACE(GET.DOCUMENT(1),1,FIND("]",GET.DOCUMENT(1)),)&T(NOW())
3、在A1单元格内输入公式="1月"&a&"日"
此时各表的A1单元格中分别显示为1月1日、1月2日、。。。。。1月30日了。

[ 本帖最后由江南民谣于 2011-1-5 16:09 编辑 ]

kvovo · 发表于 2011-1-5 16:16

谢谢果然高手！

andui · 发表于 2011-1-5 19:40

恩
坐等高手解答

佛山小老鼠 · 发表于 2011-1-5 20:32

看看这个,符合要求不

ysz36885 · 发表于 2011-1-6 11:23

受启发，谢谢高手

zjhxmjl · 发表于 2011-1-6 14:31

原帖由 佛山小老鼠 于 2011-1-5 20:32 发表
看看这个,符合要求不

宏不错，谢谢学习研究中

lkmmkl · 发表于 2011-1-6 17:34

看了并学习中

ilyou2049 · 发表于 2011-1-7 14:04

学习中。。。。。

lhx120824 · 发表于 2011-1-7 14:22

做这么多表好用吗？

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

[求助] 如何在excel里一次在30个工作表中输入1日-30日的日期

回复 11楼 honggexjq 的帖子