excel - 如何在excel中突出显示选定的文本

Question

我想编写一个 VBA 函数来突出显示 excel 单元格中的特定文本。这可能吗？我一直在谷歌搜索，但目前还不清楚。

为了澄清，我想在特定列中搜索文本值(实际上是值列表)，并以黄色突出显示匹配的文本。

注意:这是我最终做的:

  Sub Colors()


    Dim searchString As String
    Dim targetString As String
    Dim startPos As Integer

    searchString = "abc"
    targetString = Cells(2, 1).Value
    startPos = InStr(targetString, searchString)

    If startPos > 0 Then

        Cells(2, 1).Characters(startPos, Len(searchString)).Font.Color = vbRed

    End If


 End Sub

Answer 1

这是基本原则，我假设自定义此代码不是您所要求的(因为没有提供有关此的详细信息):

 Sub Colors()

 With Range("A1")
    .Value = "Test"
    .Characters(2, 2).Font.Color = vbGreen
 End With

 End Sub

简短的描述虽然不言自明:第一个“2”是指需要着色的第一个字符，第二个“2”是指长度。