populate data from a list based on numbers input

Hello,

I am looking to create a sheet that when i scan a barcode into a cell it populates a cross referenced number in the next cell.

Basically i have items that have two types of identification tags. One that is a six digit number with a barcode (asset tag) and the other a four digit number used a a type of serial number.

I want to be able to scan the barcode and have the second number show up in the next cell after referincing the document that has a cross referance sheet.

Sorry for my inexperiance.

Thanks for your help.

This code belongs on the sheet you are entering the barcodes into.

Your post lacks a lot of details so your probably going to need to change a bit of this code. I put comments in telling you what you need to change.

Private Sub Worksheet_Change(ByVal Target As Range)

If Target.Column = 1 Then 'Whatever column you enter the barcodes into
    ws2 = Worksheet("Cross Reference") ' whatever the name of the sheet is with the cross references
    Set c = ws2.Range("A:A").Find(Target.Value)  ' whatever column the barcodes are on in the cross reference sheet
    If Not c Is Nothing Then
    
        'wherever you want to put the serial number. Here it is one column to the right of the entered barcode
        Target.Offset(0, 1).Value = _
        c.Offset(0, 1).Value ' wherever the serial numbers are in reference to the barcodes on the cross reference sheet
    End If
End If
End Sub

Thank you for your help I will work with this.

Again I'm sorry for the ambiguity