在excel中如何使用vba命令实现批量删除指定名称的工作表？

如题所述

推荐答案 2018-02-17

按Alt + F11，双击ThisWorkbook，粘贴下面的代码：
Sub ouyangff()
On Error Resume Next
Application.DisplayAlerts = False
For i = 2 To [g65536].End(3).Row
a$ = Cells(i, 7)
Sheets(a$).Delete
Next
Application.DisplayAlerts = True
End Sub
按Alt + F11，回到你的画面所示的“表”中！
按Alt + F8，确定！
去试一试吧！！！

温馨提示：答案为网友推荐，仅供参考

当前网址：http://66.wendadaohang.com/zd/Ui9n9v2DnDspn99Unnx.html

相似回答

EXCEL中如何用VBA删除多个工作表?答：打开一个Excel文件，鼠标右击下面的工作表（如sheet1）。选择“查看代码”，就可以打开VBA编辑界面。选择如下图所示的下拉菜单，选择“worksheet”。选择如下图所示的下拉菜单，选择对应的触发模式。这里我们选择BeforeDoubleClick，意思就是说：在本工作表鼠标双击（之前），将触发下面的代码程序。（activate意...

Excel VBA批量删除指定sheet,sheet名称为shuju 需要完整代码,完整代码...答：Sub1()Dim filepath As Stringfilepath = "d:\test" '指定目录Dim file As Stringfile = Dir(filepath & "\" & "*.xlsm") '提取目录下所有文件名，注意不会查询子目录。Do While file <> "" Dim Wb As Workbook Wb = Workbooks.Open(filepath & "\" & file)'打开文件 Di...

如何用excel代码批量删除多个excel工作表的vba代码答：（1）把这100个excel文档放在同一个文件夹；（2）在其他任何地方新建一个excel，名称任意；（3）在新建的这个excel里添加以下代码（用你的代码改的）；（4）在“宏安全性”设置里勾上“信任对VBA工程对象模型的访问”，然后运行即可 Sub 批量删除vba代码()'On Error Resume Next '这里把它注释是...

Excel VBA 删除指定工作表与模块答：1.点按快速启动栏excel 程序图标进入excel 界面点击选中任意单元格然后按alt+f11 进入vbe界面。2.点击菜单栏插入命令在弹出的活动菜单中点按模块命令。3.另一种方式插入模块的方法可以在工程资管管理器中鼠标点击空白处右键单击鼠标在弹出的快捷菜单中选择插入命令二级菜单中选择模块命令。4.如图...

介绍在excel删除名称的两种方法答：利用VBA编写一个小程序，可以一次性删除工作簿中的所有名称。下面的程序就是一次性删除工作簿中的所有名称，无论这些名称是工作簿级的，还是工作表级的，都使用。首先按快捷键，打开VBA编辑器窗口，单击菜单“插入”→“模块”插入一个新模块，默认情况下为“模块1”，然后在模块1的代码窗口中输入以下...

VBA批量删除excel中的工作表答：单击SHEET1，按住SHIFT再单击SHEET15，会将SHEET1到SHEET15全选定，然后右键单击任何一个选中的SHEET，删除

大家正在搜

navicat怎么用命令批量删除 vba批量删除工作簿中代码 vba批量删除工作表 vba批量删除指定文件 vba批量删除指定行批量删除命令安卓批量删除命令批量删除指定多文件 vba批量删除信息