Excel vba 编程批量删除工作表
Sub批量删除表()DimRngAsWorksheetSetRng=Union(Sheets(1),Sheets(2))'该句错误Rng.DeleteEndSub我想将要...
Sub 批量删除表()
Dim Rng As Worksheet
Set Rng = Union(Sheets(1), Sheets(2)) ' 该句错误
Rng.Delete
End Sub
我想将要删除的表格集中起来，一次性删除。这样不影响我某些计算。该怎么修改或者有其他更好的方法吗？ 展开
Dim Rng As Worksheet
Set Rng = Union(Sheets(1), Sheets(2)) ' 该句错误
Rng.Delete
End Sub
我想将要删除的表格集中起来，一次性删除。这样不影响我某些计算。该怎么修改或者有其他更好的方法吗？ 展开
1个回答
展开全部
=.=这种问题，录制宏不就搞定了？？
Application.DisplayAlerts = False
Sheets(Array(Sheets(1), Sheets(2))).Delete
Application.DisplayAlerts = True
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
