1.Excel中有31个工作表，在各自的B1单元格中生成连续的日期：2.Alt+F11，输入代码如下：代码是按顺序让1到31的工作表的B1单元格变成今天日期开始的，依次递增1的日期，并设置单元格格式为“YYYY年MM月DD日”3.F5运行代码，返回Excel，就看到B1单元格内生成了连续的日期：

如果：第一张表使用即时（当前）日期公式：=TODAY()那么：第二张、三张表……的公式：=Sheet依!A依+依、=Sheet贰!A依+依……依次类推。这样每张表的日期是随时间改变而改变的。如果：第一张使用一个固定日期，如：贰0依三-9-三那么：后面表的公式与也是相同的。这样设置的每张的日期是不随时...

右键点工作表标签，全选工作表 选择B4单元格，设置单元格格式为日期，并输入公式 ="2011-1-1"+RIGHT(CELL("filename",A1),LEN(CELL("filename",A1))-SEARCH("sheet",CELL("filename",A1))-LEN("sheet")+1)-1 确定 然后取消工作表成组 注意：本公式只适合sheet1、sheet2这样的工作表标签名...

dim i&,x& dim rq as date i=sheets.count '计算工作表数 rq=date '赋值当期日期,这根据你的起始日期自己修改 for x=1 to i '建立每个表循环 with sheets(x).range("A1")=rq '给当前表A1单元格赋值日期 .printout '打印当前表 rq=rq+1 '日期加1天 end with next x end sub '运...

如果需要修改的单元格位置相同，可以同时点击选择所有31个工作表标签，然后在当前工作表修改，所有31个表会同时被修改

在B1输入，C1拉就好 =DATE(YEAR(A1),MONTH(A1),DAY(A1)+10)

2 日期： =date(a1,b1,c1)注意使用分页预览吧，把第一行的数字放置在页面外打印不出来即可，把A2和B2的函数拖放到正确的位置去就可以了。如果要打印6月的30张，就复制30个表吧，呵呵，7月就复制31张，方便好看，一次打印一个月的。关键问题就是把所有的表的C1改成与日期对应的数字即可。本人曾经...

(电脑型号:惠普 (HP) 暗影精灵8Pro,软件及版本号:WPS 11.1.0.13703) 1、打开Excel表格,可以看到已经有一个格式正确的日期了。 2、选中这个单元格,将光标至于单元格右下角,待其变成黑色十字。 3、按住鼠标左键,然后一直往下拉,就可以得到递增的日期了。 5 评论 分享 举报 刺...

用VBA程序把它设成自动更改的即可！

我们应该如何在ex每个工作表中最多中递增日起了，想这个问题希望有，在这方面值得的朋友们看看它的递增日期应该怎么操作的。