EXCEL VBA 到 select ROWS 如果单元格 A5 包含特定文本 - 警告

Question

我每天都会收到一份 excel 文件。 如果从 A5 到动态数据末尾的单元格包含字符串“TURNER 232”，我正在尝试 select 所有 ROWS

• 单元格 A1 到 A3 为空白
• 单元格 A4 是列标题
• 表格动态末尾的单元格 A5 始终包含“TURNER 232”

我一直在从该网站复制各种代码示例，但无济于事。

如果可能的话，将不胜感激。

非常感谢马特

使用的代码

Sub CustomSelect()
    Dim i As Long: i = 2
    Do While Range("H" & i).Value = "TURNER 232"
        i = i + 1
    Loop
    Range("A5:H" & i - 1).EntireRow.Select
End Sub

Answer 1

斯科特，

我使用了下面的方法。

感谢伙伴。第一次参加 VBA 的晚会

Sub CustomSelect()
     Dim i As Long: i = 5
     Do While Range("A" & i).Value = "TURNER 232"
        i = i + 1
     Loop
     Range("A5:A" & i - 1).EntireRow.Select
End Sub