如何在Sheets中使用regex为非>开头的换行内容自动编号

核心实现逻辑如下：

• 先拆分单元格内的所有行，单独保留第一行的原始内容
• 遍历第一行之外的剩余行时维护一个独立计数器，初始值设为1
• 每遇到非>开头的行，就给行前加上当前计数器值+. ，同时计数器自增1
• 每遇到>开头的行，直接保留原内容，计数器数值保持不变
• 最后把处理后的所有行拼接回单个单元格内容即可

Google Sheets 自定义函数实现 #

你可以直接在表格中绑定以下Apps Script代码，之后直接在单元格中调用=AUTO_NUMBER(目标单元格)就可以实现效果：

function AUTO_NUMBER(cellContent) {
  const lines = cellContent.split('\n');
  // 保留第一行原样
  const result = [lines[0]];
  let counter = 1;
  // 从第二行开始处理
  for (let i = 1; i < lines.length; i++) {
    const line = lines[i].trimStart();
    if (line.startsWith('>')) {
      result.push(lines[i]);
    } else {
      result.push(`${counter}. ${lines[i]}`);
      counter++;
    }
  }
  return result.join('\n');
}

Excel 实现方案 #

你可以用VBA自定义函数实现，操作路径：按Alt+F11打开VBA编辑器，插入模块，粘贴以下代码，之后在单元格调用=AutoNumber(目标单元格)即可：

Function AutoNumber(cellContent As Range) As String
    Dim lines As Variant
    lines = Split(cellContent.Value, vbLf)
    ' 保留第一行
    Dim result As String
    result = lines(0)
    Dim counter As Integer
    counter = 1
    Dim i As Integer
    For i = 1 To UBound(lines)
        If Left(LTrim(lines(i)), 1) = ">" Then
            result = result & vbLf & lines(i)
        Else
            result = result & vbLf & counter & ". " & lines(i)
            counter = counter + 1
        End If
    Next i
    AutoNumber = result
End Function

注意事项 #

• 若你使用Windows系统的换行格式，仅需把代码中的换行拆分符从\n/vbLf替换为\r\n/vbCrLf即可
• 如需调整编号起始值、编号后缀，直接修改代码中计数器初始值、拼接的分隔符即可

内容的提问来源于stack exchange，提问作者Debora S.