Excel VBA 删除指定工作表与模块

1.点按快速启动栏excel 程序图标 进入excel 界面 点击选中任意单元格 然后按alt+f11 进入vbe界面。

2.点击菜单栏 插入命令 在弹出的活动菜单中点按模块命令。

3.另一种方式插入模块的方法可以在工程资管管理器中鼠标点击空白处 右键单击鼠标 在弹出的快捷菜单中选择插入命令 二级菜单中选择模块命令。

4.如图所示模块1、模块2分别是通过菜单栏插入命令 和工程资源管理器点击右键创建的模块。

5.如果要删除工程资源管理器中多余的模块2或模块1 首选在工程资源管理器中鼠标左键点击要删除的模块 然后点击菜单栏 文件命令 在弹出的活动菜单中点移除模块2或模块1。

6.或者用另一种方法删除模块 在工程资源管理器中鼠标右键单击要删除的模块 在弹出的的快捷菜单中选择移除模块命令 删除了模块同时也将删除保存在模块中的所用代码程序。

7.模块的作用是存储过程 要为模块添加过程需要首先双击工程资源管理器相应模块 此时界面最上方显示该模块。

8.在菜单栏上点按插入命令 在弹出菜单中点过程 在弹出的对话框中为过程起一个名字 点按确定。

9.这是点按确定后显示在代码窗口的空过程代码 这个代码也可以通过手动输入。

10.将一下代码写入刚才插入的空过程代码中两行之间 然后点按菜单栏 运行命令 运行子过程/用户窗体 或者按F5快捷键 此时界面跳转到excel界面显示如下提示框。

11.如果对代码中某个位置不了解可以鼠标点击拖动选中该位置 然后按f1将会弹出帮助信息。

删除指定工作表的代码如下：
Sub 删除指定工作表()
Dim a As String
a = InputBox("请输入要删除的工作表名字")
Sheets(a).Delete
End Sub