怎么在excel中实现自动生成序号,如在B列中输入内容,A列中会自动生成1~n的序号

已举报 回答 关注
怎么在excel中实现自动生成序号,如在B列中输入内容,A列中会自动生成1~n的序号
问在线客服
扫码问在线客服

求高手给个详细的VB程序,我是个新人,谢谢!

  • 回答数

    5

  • 浏览数

    11,205

5个回答 默认排序
  • 默认排序
  • 按时间排序

已采纳
1。要有人名与班组的对照表2。用VLOOKUP函数:=VLOOKUP(A2,D:E,2,0)假设: A列是要录入的人名;B列是上面的公式; D列是人名,E列是其所在的对应班组。
取消 评论
这个似乎犯不上用VB的吧,VBA也解决得绰绰有余。但使用函数你自己也可以解决得像模像样。

例如A列A2输入1,A3: =IF(B3,A2+1,) ,往下拖到足够或适当,……
取消 评论
1、选定区域,反点,创建列表(解决你插入行时序号就不能生成的问题)再录入函数。
2、如题函数为(在A2中录入:
=if(B2=,,row()-1)
下拉即可。

这种简单的东西,再编曲VBA,没有必要。
取消 评论
公式方案:
A1=COUNTA($B$1:B1) ,向下填充公式。
VBA方案:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 2 Then
Cells(Target.Row, 1).Value = Application.Evaluate(counta(b1:b & Target.Row & ))
End If
End Sub
取消 评论
假设序号从A2开始,在A2单元格内输入
=ROW(A1)
下拉填充
取消 评论
ZOL问答 > 怎么在excel中实现自动生成序号,如在B列中输入内容,A列中会自动生成1~n的序号

举报

感谢您为社区的和谐贡献力量请选择举报类型

举报成功

经过核实后将会做出处理
感谢您为社区和谐做出贡献

扫码参与新品0元试用
晒单、顶楼豪礼等你拿

扫一扫,关注我们
提示

确定要取消此次报名,退出该活动?