简单的VBA从第一个.Find值中select一个范围？

我想在列“A”中find一个值，然后从该地址select遇到的第一个空行。 这是我有，但集f不工作。 我的集合c工作，并返回$ A $ 32，这是正确的地址。 我错过了什么？

With Workbooks("MyBook").Sheets("Mysheet") Set c = .Range("$A:$A").Find("Red Car").Offset(2, 0) Set f = .Range(c.Address & Range("A").End(xlDown).Row) End With 

Answer 1

试试这个，首先检查find的search词

 With Workbooks("MyBook").Sheets("Mysheet") Set c = .Range("$A:$A").Find("Red Car") If Not c Is Nothing Then Set f = Range(c.Offset(2, 0), c.Offset(2, 0).End(xlDown)) End With 

Answer 2

Removed Code

你只是想分配Range($A$32 & LastRow) 。 在不添加:(冒号）和列字母（A）的情况下，它不能正确地将范围赋予F.试试这个代码，看看它现在是否工作。