Excel 详解EXCEL中合并单元格自动添加序号问题

如上图，要自动自成A列合并单元格后的添加序号问题，有如下6种方法可实现。

首先选中要输入序号的所有合并单元格区域（A4：A16）：

1、在编辑栏录入=max($A$3:A3)+1,按CTRL+回车键。

2、在编辑栏录入=max($A$1:A3)+1,按CTRL+回车键。

3、在编辑栏录入=count($A$3:A3)+1,按CTRL+回车键。

4、在编辑栏录入=count($A$1:A3)+1,按CTRL+回车键。

5、在编辑栏输入=MAX(INDIRECT("$A$1:A"&ROW()-1))+1，按CTRL+回车（ENTER）。

6、制作VBA按钮，运行按钮，省事了得。模块代码如下：
Sub xh()
K = 0
XR = ActiveSheet.UsedRange.Rows.Count
    Range("A4:A" & XR) = 1
        For j = 4 To XR
            If Cells(j, 1) <> "" Then
                K = K + 1
                Cells(j, 1) = K
            End If
        Next
End Sub
当你的初始序号单元格是不定的。如果你的是A2，就把这段代码中的A4换成A2。
集中精力，学学EXCEL的函数和VBA，就会提高工作效率的。愿大家都来琢磨EXCEL。