Question

用vb给excel表增加工作簿，并修改其名称

如图所示我想通过VB程序自动给excel表格加工作表， 比如说今天到8点了就就自动添加工作表并如图所示命名，明天就继续添加工作表并命名好。
大伙给看看····在此谢谢了。

Answer 1

工作表事件.放在ThisWorkbook的VBE代码窗口

Private Sub Workbook_Open()
Dim shname As String, sh As Worksheet
shname = Sheets(Sheets.Count).Name
If shname < Date Then
Set sh = Sheets.Add(after:=Sheets(Sheets.Count))
sh.Name = Date
End If
End Sub

追问

您好。
首先谢谢您。
比如每天早上 8点 我的VB界面上的有关信息会自动传到excel里，8点之前也许都没有今天的表，就在8点整有表了并且表里的内容是刚才传的信息。
这个怎么实现呢？

追答

梦想是好的,但不可能在我这里实现