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

如题所述

第1个回答  2020-01-06
按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,确定!
去试一试吧!!!
第2个回答  推荐于2019-08-12
代码及注释如下:
Sub shanchu()
Application.DisplayAlerts = False'关闭提示,否则每删除一个非空工作表,都会出现提示
For i = 2 To [g65536].End(3).Row'i从2到G列最后一个非空行数循环
Sheets(Cells(i, 7).Delete'将工作表名为G列对应的工作表删除
Next
Application.DisplayAlerts = True'开启提示
End Sub本回答被网友采纳

在excel中如何使用vba命令实现批量删除指定名称的工作表?
按Alt + F11,回到你的画面所示的“表”中!按Alt + F8,确定!去试一试吧!!!

excel中怎么使用Vba批量删除指定文件夹下的所有文件?
1、首先新建一个excel文件并双击打开,打开后,按快捷键F12进行另存为,注意另存的格式要选择启用宏的工作簿,如下图所示:2、接着找到左上角的文件按钮,选择选项按钮,如下图所示:3、在弹出的对话框中选择信任中心,并选择信任中心设置,接着选择隐私选项,并把保存时删除个人信息的对号去掉,整体设...

如何快速删除excel工作簿中所有已定义的名称
1.按快捷键Alt+F11,打开VBA编辑器。在右侧的代码窗口中输入:Sub DeleteAllNames()Dim nm As Name For Each nm In ThisWorkbook.Names nm.Delete Next nm End Sub 2.将光标定位到这段代码中,单击工具栏中的“运行子过程\/用户窗体”按钮,或直接按F5键运行代码。该工作簿中的所有定义名称将被删...

Excel表格中用函数或VBA或其他方法批量去掉某些行
Private Sub CommandButton1_Click() Dim sh As Worksheet On Error Resume Next Set sh = Sheets("结果表") If Err.Number = 9 Then Set sh = Sheets.Add sh.Name = "结果表" Sheets("数据源").Columns("A:F").Copy sh.Cells(1, 1) End If Dim i As...

Excelvba删除工作表的代码和实例
vba删除工作表案例一:删除一张表以外的所有工作表 如下图所示:这一个excel工作薄包含多张工作表,如何使用vba删除 “IT部落窝论坛”以外的工作表呢?右边截图就是使用VBA代码删除后的效果,整个工作薄就只剩下一张工作表:IT部落窝论坛。下面是具体的vba删除工作表操作步骤:第一,按下ALT+F11,打开...

excel怎样批量删除多个指定行?
Excel批量删除多个工作簿的指定工作表指定行,只能用VBA编程来实现,具体操作如下:第一步:按Alt+F11组合键打开VBA编辑器;第二步:依次单击“插入”菜单”-“模块”;第三步:在代码框中编写代码,如下图:代码图 上图的代码含义是:利用For循环语句循环10次,删除从第一个工作簿(此处用变量i代替...

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中如何用VBA删除多个工作表?
worksheets(i).delete end if next end sub 如何使用Excel VBA 打开一个Excel文件,鼠标右击下面的工作表(如sheet1)。选择“查看代码”,就可以打开VBA编辑界面。选择如下图所示的下拉菜单,选择“worksheet”。选择如下图所示的下拉菜单,选择对应的触发模式。这里我们选择BeforeDoubleClick,意思就是说:...

如何用vba语言 删除指定工作表
Sub stopDeleSheet()Application.CommandBars(1).Controls(2).Controls(12).Enabled = FalseEnd Sub运行后效果如图,如果放在工作簿打开事件中,就能对该工作簿自动生效。你也可以把这句代码放在模块中作为Excel加载项,这样就可以对所有Excel文档生效了 ...

怎么利用Excel中的VBA删除文件
1. 如图,我们在D盘根目录下选择一个文件,利用Excel中的VBA编程将该文件删除。2. 首先打开电脑上的Excel表格,依次点击上方的“开发工具”---“Visual Basic”选项。3. 在打开的VBA中,我们可以利用Kill函数将文件删除,将文件的完整路径作为其参数就可以了,如图,在打开的VBA编辑页面,输入代码:Sub ...

相似回答