Excel VBA常见问题:能否根据单元格数值自动标记序号?

2015-04-13 17:38 阅读 218 次 评论关闭

Excel VBA常见问题:一工作表有两列,“序号”及“金额”,能否将金额不等于0的行自动标上序号呢?如无现成的函数,应怎样设置?

解答:

Dim xuhao As Integer
xuhao = 1
Range("b2").Select
Do While Selection <> ""
If Selection <> 0 Then
ActiveCell.Previous.Value = xuhao
xuhao = xuhao + 1
End If
ActiveCell.Offset(1, 0).Range("a1").Select
Loop

版权声明:本文著作权归原作者所有,欢迎分享本文,谢谢支持!
转载请注明:Excel VBA常见问题:能否根据单元格数值自动标记序号? | 猎微网

评论已关闭!