大侠们~快救救~在线等excel问题

来源：百度知道 编辑：UC知道 时间：2024/05/08 00:53:21
我有一张工作薄，里面有1000张表，每张表都是一张调查问卷，而且每张表上有按钮选项：老师，家长，学生。现在问题就是，我需要把1000张表中选择了家长和老师的从工作薄删除，怎么做到啊
是选项按钮~每个表头有三个选项按钮

代码如下:

Option Explicit
Dim ws As Worksheet
Sub delws()
Application.DisplayAlerts = False
For Each ws In Worksheets
If ws.Range("a1") = "老师" Or ws.Range("a1") = "家长" Then ws.Delete
Next ws
Application.DisplayAlerts = True
End Sub

自己根据需要更改 放 老师或 家长的单元格地址.

楼主MM，建议你去club.excelhome.net去提问，那里高手很多，估计会立即解决你的问题。

GOOD LUCK！

每个表的固定单元格有没有“老师、家长、学生”这些标志?

我知道用宏能行，具体不知道杂写这个宏。