我想在一系列单元格中找到一个特定单词,然后用红色突出显示它.为此,我创建了此代码,但它只在一行上工作并突出显示了所有单元格文本:
Sub Find_highlight()
Dim ws As Worksheet
Dim match As Range
Dim findMe As String
Set ws = ThisWorkbook.Sheets("MYSHEET")
findMe = "Background"
Set match = ws.Range("G3:G1362").Find(findMe)
match.Font.Color = RGB(255, 0, 0)
End Sub
Run Code Online (Sandbox Code Playgroud)