How to get sequence number in the next column?

[geniusideas]

Hi,

I have series of numbers in column A and I need the sequence number in
column B exclude empty cell. Example:
Column
A B (result)
15 2
20 4
18 3

14 1
80 6
50 5

Please help how to do using vba and without any sorting?

 

[Bob Phillips]

Try

=IF(X1="","",RANK(X1,$X$1:$X$7,1))

 

[geniusideas]

Thanks Bob,

it work but i need to changed X to A only.