Question

怎么将EXCEL中各工作表的名字快速变为日期？？？还有怎么将每个工作表中的同一格设为连续的日期？？

E.G.
创建一个工作簿，在其中快速插入30个表，然后将表名改为日期，同时在各个表中的A1单元格设置成2010.10.01，2010.10.02......2010.10.30？？请教高手有什么迅速的办法

Answer 1

首先，楼主问题有2
1、创建一个工作表，如何在其中快速插入30个表？
答：可以使用宏，但是不熟悉者容易出错，而且也麻烦，所以还是建议手工复制。这里有个小诀窍，你每次复制前，先右键工作表， “选定全部工作表”，再点击“移动或复制工作表”，这样只要复制5次就可以出来30张表了。就是工作表的名字还是需要手工改，你可以直接双击工作表，直接修改表名，也很快的。
2、如何将各表的A1单元格设置成2010.10.01，2010.10.02....？
答：这里用宏或函数也可以实现，但并不简单，所以也建议手工输入。有个技巧是：选定全部工作表，然后在a1单元格输入2010.10.01。那么这样，每张表都只需要修改最后两个数字了。
楼主好运！

Answer 2

单击第一个工作表,按住shift键再单击最后一个工作表,形成一个工作表组,然后再A1单元格中输入你想输入的内容,其他工作表同样都有了

追问

我需要日期是按天增加的，不是一样的

Answer 3

新建一个工作薄
打开VBE窗口的thisworkbook工程代码窗口：
将以下代码复制进去：
Sub aa()
Dim i As Integer
If Worksheets.Count < 30 Then
For i = 1 To 30 - Worksheets.Count
Worksheets.Add
Next i
End If
For i = 1 To 30
If Worksheets(i).Name <> "2011.10." & i Then
Worksheets(i).Name = "2011.10." & i
End If
If Worksheets(i).Cells(1, 1) <> "2011.10." & i Then
Worksheets(i).Cells(1, 1) = "2011.10." & i
End If
Next i
End Sub
运行即可！

追问

这，比较菜，有没有不要代码的方法？

追答

用上述代码是最好的方法，目前没有发现其它比这好的方法！