表数组上的VBA查找function

我试图删除不包含表列的数组中的特定字符的行。 该数组加载数据就好了，但是当试图用Find函数设置“x”时，我得到了“Object Required”，它正在困扰着我。

我相信这很简单，但是我遇到的每个解决scheme都没有什么不同。

srchRng = Range("OS[OS Version]") Set x = srchRng.Find(What:="=", LookAt:=xlWhole, LookIn:=xlValues) If x Is Nothing Then x.EntireRow.Delete 

Answer 1

testing – 把它放在一个这样的块：

 With Worksheets(1).Range("OS[OS Version]") Set x = .Find(What:="=", LookAt:=xlWhole, LookIn:=xlValues) If Not x Is Nothing Then x.EntireRow.Delete End With 

---

请注意，您正在search具有等号的单元格，而不是别的。

Answer 2

我想你的If语句是落后的。 尝试这个：

 If Not (x Is Nothing) Then x.EntireRow.Delete