如何为工作表中新插入行自动按最大现有编号递加编号

核心逻辑：新插入行的序号取当前已有数据的最大序号+1，不修改原有行的固定序号，适配任意插入位置。 #

Excel 实现方案 #

无代码公式方案（适合不想用宏的场景） #

• 选中现有全部数据区域，按下Ctrl+T，勾选「表包含标题」，确认转换为超级表
• 点击序号列第一个空白数据行，输入公式：=IF([@任意非空列列名]<>"",MAX($A:$A)+1,"")，将公式里的任意非空列列名替换为你表格里某行录入内容就代表该行有效的列名（比如内容列、姓名列等）
• 后续插入新行时，只要在对应非空列输入内容，序号列会自动计算当前最大序号+1填充，原有序号不会变动

自动触发VBA方案（插入行自动填充，无需手动输入内容触发） #

• 按下Alt+F11打开VBA编辑器，双击左侧项目面板中你要设置的工作表名称
• 在弹出的代码编辑窗口粘贴如下代码：

Private Sub Worksheet_Change(ByVal Target As Range)
    Dim maxSerial As Long
    ' 下方数字1代表序号列为A列，如有需要可自行修改为对应列号
    If Target.Column = 1 Then Exit Sub
    On Error Resume Next
    maxSerial = Application.WorksheetFunction.Max(Range("A:A"))
    If Target.Offset(0, 1 - Target.Column).Value = "" And Target.Value <> "" Then
        Application.EnableEvents = False
        Target.Offset(0, 1 - Target.Column).Value = maxSerial + 1
        Application.EnableEvents = True
    End If
End Sub

• 保存文件为xlsm格式（启用宏的工作簿）即可，后续任意位置插入行后，只要在该行任意非序号列输入内容，序号会自动填充为当前最大序号+1

WPS表格实现方案 #

上述Excel的两种方案完全适配WPS表格，使用宏方案时需要先在WPS安全中心开启宏功能，代码无需修改。 #

Google Sheets实现方案 #

使用Apps Script实现自动触发：

• 点击菜单栏「扩展程序」-「Apps Script」，删除默认的示例代码
• 粘贴如下代码：

function onEdit(e) {
  const activeSheet = e.source.getActiveSheet();
  const editRange = e.range;
  // 序号列为A列，对应列号1，如有需要可自行修改
  if (editRange.columnStart === 1) return;
  const allSerials = activeSheet.getRange("A:A").getValues().flat().filter(item => !isNaN(item) && item !== "");
  const maxSerial = allSerials.length > 0 ? Math.max(...allSerials) : 0;
  const serialCell = activeSheet.getRange(editRange.rowStart, 1);
  if (serialCell.getValue() === "" && e.value !== "") {
    serialCell.setValue(maxSerial + 1);
  }
}

• 点击保存按钮，给项目命名后刷新表格即可生效

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