如何在Google Sheets/Excel中为单元格句子内匹配同行前单元格的单词上色？

Google Sheets 实现方式 #

仅靠内置条件格式无法实现单个单词上色（它只能针对整个单元格），需要借助Google Apps Script完成字符级格式设置：

1. 打开表格后，点击「扩展程序」→「Apps Script」
2. 粘贴以下脚本（示例以A2为匹配词单元格、B2为目标句子单元格为例）：

function highlightMatchingWord() {
  const sheet = SpreadsheetApp.getActiveSpreadsheet().getActiveSheet();
  const matchWord = sheet.getRange("A2").getValue().trim();
  const targetCell = sheet.getRange("B2");
  const text = targetCell.getValue().toString();
  
  if (!matchWord || !text) return;
  
  const startIndex = text.indexOf(matchWord);
  if (startIndex !== -1) {
    const textStyle = SpreadsheetApp.newTextStyle()
      .setForegroundColor("#ff0000") // 可自定义高亮颜色
      .build();
    const richTextValue = SpreadsheetApp.newRichTextValue()
      .setText(text)
      .setTextStyle(startIndex, startIndex + matchWord.length, textStyle)
      .build();
    targetCell.setRichTextValue(richTextValue);
  }
}

3. 保存脚本后运行即可完成单个单词上色；若需要内容更新时自动触发，可添加onChange触发器。

Excel 实现方式 #

Excel同样需要借助VBA实现单个单词的上色：

1. 按Alt + F11打开VBA编辑器
2. 插入模块，粘贴以下代码：

Sub HighlightMatchingWord()
    Dim matchWord As String
    Dim targetCell As Range
    Dim text As String
    Dim startPos As Integer
    
    matchWord = Trim(Range("A2").Value)
    Set targetCell = Range("B2")
    text = targetCell.Value
    
    If matchWord = "" Or text = "" Then Exit Sub
    
    startPos = InStr(1, text, matchWord, vbTextCompare)
    If startPos > 0 Then
        targetCell.Characters(startPos, Len(matchWord)).Font.Color = RGB(255, 0, 0) ' 可自定义高亮颜色
    End If
End Sub

3. 运行宏即可完成上色；若要自动触发，可在工作表的Change事件中调用该宏。

另外也可手动用「查找和替换」设置：按Ctrl + F打开查找框，输入匹配单词，点击「格式」设置字体颜色后选择「全部替换」，但这种方式是静态的，内容更新后需重复操作。

内容的提问来源于stack exchange，提问作者Mergen