Barcode scanning

[johnfli]

Ok, Here is what I want to have happen.

I want a user to be in cell A1 for example.
When they scan a barcode with a scanner, I want the value of that barcode in
cell A1, and I want the date and time that it was scanned in cell B1.
Then I want it to jump down to cell A2 so they can scan anohter barcode.

How do I get it to do this?

Thanks

 

[L. Howard Kittle]

Hi John,

I don't have a scanner to test this but have written some slightly more
complicated code to do about the same thing for scanned items.

Some assumptions: The scanner has an "ENTER" feature. So once the scan is
done the activecell is the one below the scan entry and the event macro is
fired from the sheet change.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If ActiveCell.Column <> 1 Then Exit Sub
ActiveCell.Offset(-1, 1).Value = Date
End Sub

HTH
Regards,
Howard