如何根据A列出现内容的先后顺序在B列编上顺序号

李兴德

如何根据A列出现内容的先后顺序在B列编上顺序号？如：在A1中输入内容后B1出现1，在A5中输入内容后B5出现2；在A2中输入内容后B2出现3等。

[ 本帖最后由 李兴德 于 2009-11-20 12:17 编辑 ]

dragonthree

这要VBA吧！用VBA返回输入内容的时间，再用RANK！

[ 本帖最后由 dragonthree 于 2009-11-20 12:21 编辑 ]

zhc19620430

b1=if(a1="","",count($a$1:$a1))或者b1=if(a1="","",SUBTOTAL（103，$a$1:$a1)*1)

[ 本帖最后由 zhc19620430 于 2009-11-20 12:41 编辑 ]

拼音佳佳

Dim a As Integer

Private Sub Worksheet_Change(ByVal Target As Range)
For i = 1 To 65535
If Cells(i, 1).Value <> "" And Cells(i, 2).Value = "" Then
a = a + 1
Cells(i, 2).Value = a
End If
Next

End Sub

试了一下vba也能做,只是速度有些慢.我不知道如何让变量a在文件关闭后依然有效.现在的变量在关闭文件后自动归零.