find特定的单元格,并使用它来创build一个范围

我目前正在寻找一个Excel工作表来find一个特定的单元格:

Set findCell = ActiveSheet.Range("D:D").Find(What:=startTerm).Offset(1, 0) 

一旦我有了这个单元格,我想从这个单元格向下创build一个范围任意数字,现在没关系。

 Set instrumentList = ActiveSheet.Range("findCell:D100").Cells 

我似乎无法弄清楚使这个正确的语法。 我基本上只需要find具有特定文本的单元格,并从中向下创build一个范围,但是我只是得到一个应用程序错误。

你会想要像这样再次使用Offset() :(添加检查startTerm未find)

 If Not findCell is Nothing Then Set instrumentList = ActiveSheet.Range(findCell, findCell.Offset(x, 0)) Else MsgBox startTerm & " Not Found!" Exit Sub End If 

其中x是你想要去的任意行数。