The ChangeEvent macro I mentioned should do the job.....as soon as a value
shows up in the selected cell, the macro chirps and the cursor moves down one
cell.......here's a quickie that might do it fo you....

Private Sub Worksheet_Change(ByVal Target As Range)
Application.ActiveCell.Select
If Not Application.Selection(Target) Is Nothing Then
Application.Selection.Offset(1, 0).Select

End If
End Sub

hth
Vaya con Dios,
Chuck, CABGx3



"wickd03" wrote:

An engine scanner is plugging the number in A1. I can not get the scanner to
plug the data anywhere else. So, as a new number is generated from the scan,
it replaces the number in A1. I need a running list of all the numbers that
come in every 5 seconds. So logically, I would like the next number to go
into cell A2. Since I can not get the scanner to automatically enter the
next number into cell A2, I need to have Excel put it there. The numbers
come in every 5 seconds. The test only runs for about 3 minutes, so putting
them into one column would be ideal.

"CLR" wrote:

Without a better understanding of your procedure, maybe you could use a
ChangeEvent macro to step the cursor to the next cell with each entry, and
turn it off when finished.

Vaya con Dios,
Chuck, CABGx3






"wickd03" wrote:

how do i get data that is being imported in 5 second intervals to enter into
the next cell? The data enters A1, then 5 seconds later another number comes
in, and I want it to go to A2, then 5 seconds late another number comes in
and i want it to go into A3, and so on?