当前位置网站首页 > Office办公 > EXCEL >

合并单元格后的添加序号问题,有如下6种方法可

时间:2015-12-21 10:45来源:未知 作者:admin 点击:
 

合并单元格添加序号.JPG (86.8 KB, 下载次数: 6)

下载附件  保存到相册

2014-2-6 15:04 上传

 


如上图,要自动自成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。 (责任编辑:admin)
二手商品更多...
    热点内容
    推荐内容