操作excel的问题?

Question

怎样改变新打开的工作薄的标题.如把book1改成051114编号形式,谢谢

Answer 1

objExl.Workbooks.Add          '增加一个工作薄
    objExl.Sheets(objExl.Sheets.Count).Name = "book1"  '修改工作薄名称 
    objExl.Sheets.Add , objExl.Sheets("book1") ‘增加第二个工作薄在第一个之后
    objExl.Sheets(objExl.Sheets.Count).Name = "book2" 
    objExl.Sheets.Add , objExl.Sheets("book2") ‘增加第三个工作薄在第二个之后
objExl.Sheets(objExl.Sheets.Count).Name = "book3" 
和上面的类似

Answer 2

我试了，怎么改不了，我是用vb调用，想生成一个表，标题是自定义的，可是默认的标题是book1