Question

我需要帮助在工作表上查找文本值并从那里向下偏移两行。

我有一个名为“Bottom of Range”标题的单元格。下面的两个单元格是实际值。根据工作表模板，问题是“范围底部”可能位于7个可能的位置。

如何在其中找到“底部范围”的单元格？然后我可以.Offset（2,0）.value2得到我想要的东西。

在宏伟的计划中。我在数百个工作簿中循环，然后通过他们的每个工作表收集数据并集中它。因为我要找的值可能是我需要在获取值之前查找其标题/定义的任何地方。

Answer 1

你走了！你想使用.Find：

Sub t()
Dim bottomCell As Range
Dim offsetCell As Range
With Sheets("Sheet1")
    Set bottomCell = .Cells.Find(what:="Bottom of Range")
    Set offsetCell = bottomCell.Offset(2, 0)
    ' Now, your offsetCell has been created as a range, so go forth young padawan!
End With
End Sub

Excel VBA在工作表上找到具有特定值的单元格（字符串）

1 个答案: