如何批量删除指定工作本

fpl_mars

问题：
1.我们这边的表格每一个候选人都有相对应的简历（工作本，对应超链接）
2.当有不合适的时候 一个一个删除很麻烦 如何在删除候选人的信息同时删掉工作本？或者通过VBA批量删除指定的工作本也行
求大神解救

表黄色的为要删除的内容。


A.rar (7.7 KB, 下载次数: 21)

2014-5-15 21:57 上传

点击文件名下载附件

yanjk120

需求不明确 啊！你是想要删除 sheet1里面 被黄色填充的整行吗 ？

yanjk120

Sub mysub()
Dim i As Integer
For i = 1 To [a65536].End(3).Row
    If Cells(i, 1).Interior.Color = vbYellow Then
       Rows(i).Delete
       i = 1
    End If
Next
End Sub