猫狗cp小说:excel－vba应用示例之创建新的工作簿_VBA编程世界

来源：百度文库 编辑：中财网 时间：2024/04/29 15:15:47
excel－vba应用示例之创建新的工作簿http://hi.baidu.com/vba123/blog 2007-01-31 16:43

创建新的工作簿
Sub testNewWorkbook()
MsgBox "创建一个带有10个工作表的新工作簿"
Dim wb as Workbook
Set wb = NewWorkbook(10)
End Sub
‘- - - - - - - - - - - - - - - - - - - - - - - 
Function NewWorkbook(wsCount As Integer) As Workbook
'创建带有由变量wsCount提定数量工作表的工作簿，工作表数在1至255之间
Dim OriginalWorksheetCount As Long
  Set NewWorkbook = Nothing
  If wsCount < 1 Or wsCount > 255 Then Exit Function
  OriginalWorksheetCount = Application.SheetsInNewWorkbook
  Application.SheetsInNewWorkbook = wsCount
Set NewWorkbook = Workbooks.Add
  Application.SheetsInNewWorkbook = OriginalWorksheetCount
End Function
示例说明：自定义函数NewWorkbook可以创建最多带有255个工作表的工作簿。本测试示例创建一个带有10个工作表的新工作簿。


excel vba ontime的问题 excel中VBA的问题 Excel VBA Excel VBA vba excel 文员之类的工作用EXCEL会常用VBA这类功能吗？ VBA高手请进（怎样在打开的EXCEL工作表中用VBA读入另一个存在盘上的工作表的指定页面）？ Excel突然说内存不足，无法创建新的文件 EXCEL工作表里的工具栏的具体应用 用VBA编程如何遍历EXCEL每一个工作表 求excel 中VBA的学习资料 那里下载EXCEL VBA编程的电子书籍 关于一个excel vba编程的问题 请教：一个EXCEL的VBA编程问题 泰罗管理理论的具体应用示例？ excel 的应用 关于Excel的应用～！ Excel 的应用 EXCEL函数的应用 Excel表格的应用 打开EXCEL时，会自动打开新的工作表 excel VBA小问题 EXCEL VBA 问题 excel VBA教程电子书