检索具有以特定文本字符串结尾的值的所有单元格

Question

有没有办法从值比较中检索单元格？让我解释一下：

假设我有一个名为“Codes”的单元格列，多单元格范围包含以下值：

• AS12G
• A25LM
• T5S0O
• NBTLM
• 55EWO
• EVOLM
• EXCLM
• VBT7S
• T82LM

如何检索以“LM”结尾的单元格？

这样我就可以捕获值：A25LM，NBTLM，EVOLM，EXCLM，T82LM

Answer 1

以下是 C

列的示例

Sub LM_Getter()
    Dim N As Long, i As Long, mesage As String, kolumn As Long

    kolumn = 3 'column C
    mesage = ""
    N = Cells(Rows.Count, kolumn).End(xlUp).Row

    For i = 1 To N
        t = Cells(i, kolumn).Text
        If Right(t, 2) = "LM" Then
            mesage = mesage & "," & t
        End If
    Next i
    If mesage <> "" Then
        mesage = Mid(mesage, 2)
    End If
    MsgBox mesage
End Sub

可以存储捕获的列表以供以后使用。

Answer 2

由于没有发布VBA代码，我认为所需的解决方案是基于单元格公式。这是它可以是什么。假设您的数据位于“A：A”列中，以“A1”开头。将此公式输入“B1”：=IF(RIGHT(A1,2)="LM",A1,"")并将其复制下来。