1、在工作表的A列输入连续的日期，然后选择数据区域的任一单元格，在“插入”选项下的“数据透视表”中，选择生成数据透视表；2、在右侧的“数据透视表选项”中，将“日期”拖曳到筛选项；3、然后在“数据透视表工具”的“选项”中，点击“显示筛选页”，即可生成以连续日期命名的工作表名。

这样就做出多个工作表，并且是用日期命名的。但是每个工作表里面都会有个日期，我们也可以一次性把它们删除，但是直接右击删除或用键盘上的删除键都是删除不了的，想要删掉的话接着往下看。选中所有要删除的工作表，就是选中【1日】工作表，再按住shift键，单击最后一个工作表【9日】，这样就选中所有工...

在你要得到工作表名为日期的单元格输入公式：=DATE(2014,MONTH(TODAY()),RIGHT(CELL("filename"),LEN(CELL("filename"))-FIND("]",CELL("filename")))

叹号前是表名，后边是单元格地址。

1）表1中A1输入2012-8-1，B1设公式=A1，表二中对A1设公式=Sheet1!A1+1，B1设公式=Sheet1!B1+1 2）对A1和B1分别定义格式，右击单元格，“设置单元格格式”-》“数字”-》“日期”或“自定义”3）在表1中对A1自定义日期格式“m"月"d"日"”，B1定义日期格式“星期二”，选中A1和B1，用...

单击【确定】按钮，选定Today函数，再次单击【确定】按钮，一切设置好，设定好的单元格会自动填充日期为当日日期，而且该日期会随编辑日期的变化而化的。假如你在24日编辑该工作表，则日期会自动填充为“2016年12月24日”。9 是不是很方便，这样可以免去每次编辑表格，总是手动输入日期的麻烦。

双击标签（SHEET1），变黑，输入“日期”，就可以了。

'可以自动的添加当月天数张工作表，并且在A1第一个显示工作表名称。Sub a()m = DateSerial(Year(Date), Month(Date) + 1, 0) - DateSerial(Year(Date), Month(Date), 0)For i = 1 To m Sheets.Add After:=Sheets(Sheets.Count)Sheets(Sheets.Count).Name = Month(Date) & "." & i...

右击工作表标签>查看代码>粘贴下面的代码即可.Private Sub Worksheet_Change(ByVal Target As Range)On Error Resume Next With Target.Cells(1)If .Address <> "$A$1" Then Exit Sub ActiveSheet.Name = .Value & "月26日-" & (.Value Mod 12) + 1 & "月26日"End With End Sub ...

Sub rq()On Error Resume NextDim i As IntegerFor i = 1 To 31 If IsError(DateValue(Year(Date) & "-" & Month(Date) & "-" & i)) Then Sheets(i & "").Range("A1").Value = "此表为空表" Else Sheets(i & "").Range("A1").Value = Month(Date) & "月...