自学资料（Excel VBA）[收集整理7]

来源：百度文库编辑：神马文学网时间：2024/04/19 17:34:04

默认分类 2009-08-01 11:57 阅读44 评论0
字号：大中小小
五)、工作表
1、添加
Sheets.Add before:=Sheets(1) '在第1工作表前添加新工作表
Sheets.Add after:=Sheets(Sheets.Count) '在最后工作表后添加新工作表
2、移动
ActiveSheet.Move before:=Sheets(2) '将当前工作表移动至第2工作表之前
3、命名
ActiveSheet.Name="工作表名" '将当前工作表命名为"工作表名"
4、删除
可以用以下语句删除当前工作表。
ActiveSheet.Delete
但在删除前Excel会自动弹出提示框，需在用户确认后方可执行删除。为避免这一干扰，可以先用以下语句关闭Excel的警告提示。
Application.DisplayAlerts = False
在删除完成后，再重新打开Excel的警告提示
Application.DisplayAlerts = True
六)、工作簿
Excel的宏对工作簿的操作主要为保存。
Dim 存盘文件名 As String
ActiveWorkbook.Save '保存当前工作簿
存盘文件名="工作表名"
ActiveWorkbook.SaveAs Filename:= 存盘文件名 '当前工作簿另存为"工作表名.xls"
在另存时，若指定的存盘文件名不包含路径，则保存在该工作簿的打开目录下。而若此存盘文件已存在，也可用关闭Excel警告提示的方法以免其自动弹出提示框。
转载自http://bbs.it.com.cn/showtopic-169943.aspx

自学资料（Excel VBA）[收集整理7] 自学资料（Excel VBA）[收集整理7] 自学资料（Excel VBA）[收集整理7] 自学资料（Excel VBA）[收集整理10] 自学资料（Excel VBA）[收集整理11] 自学资料（Excel VBA）[收集整理12] 自学资料（Excel VBA）[收集整理13] 自学资料（Excel VBA）[收集整理14] 自学资料（Excel VBA）[收集整理2] 自学资料（Excel VBA）[收集整理1] 自学资料（Excel VBA）[收集整理3] 自学资料（Excel VBA）[收集整理4] 自学资料（Excel VBA）[收集整理5] 自学资料（Excel VBA）[收集整理6] 自学资料（Excel VBA）[收集整理8] 自学资料（Excel VBA）[收集整理9] 自学资料（Excel VBA）[收集整理16] 自学资料（Excel VBA）[收集整理15] 自学资料（Excel VBA）[收集整理155] 自学资料（Excel VBA）[收集整理15] 自学资料（Excel VBA）[收集整理3] 自学资料（Excel VBA）[收集整理6] 自学资料（Excel VBA）[收集整理15] 自学资料（Excel VBA）[收集整理00]