Question

Excel 2010 VBA实现序号自动排列，求高手回答，急，谢谢！有图片。

A组序号与前序号自动-1，填写下一行时序号自动生成，在线等，谢谢。

Answer 1

在A2中输入: =ROW()-1, 向下填充就好了

Answer 2

=if(B:B="","",row()-1)
公式作用就是所在行的B列，如果填写了内容，这一格就填写行号-1的内容

Answer 3

既然你要的是vba，那用法我就不讲了，这是工作表事件
代码如下
Private Sub worksheet_Change(ByVal Target As Range)
If Target.Row = 1 Or Target.Column <> 2 Then Exit Sub
If Target.Row = 2 Then
Cells(2, 1) = 1
Else
Cells(Target.Row, 1) = Cells(Target.Row - 1, 1) + 1
End If
End Sub