标签：
Sub 新建工作表() Sheets.Add , , 2 自动命名
Sheets.Add.Name = "hello" 直接命名
End Sub
Sub 删除工作表() Sheet1.Delete
Sheets("hello").Delete
on error resume next
application.displayalert = false 删除时屏蔽弹出框
End Sub
Sub 移动工作表() Sheet3.Move , Sheet2 End Sub
Sub 选择工作表() ‘Sheet3.Select ‘不能选择隐藏 Sheet3.Activate
Worksheets("sheet5").Select
Worksheets(Array("sheet5", "sheet6")).Select 多选
End Sub
标签：
原文地址：http://www.cnblogs.com/qcl_008/p/4812563.html
