Use barcode to trigger event on Form

[JoeyGaspard]

I have created an access form that uses a barcode scanner to enter data for employee supplies, they can scan up to 5 supplies per employee. What I would like to do is after they have scanned all they are issuing to the employee, to be able to scan a barcode that emulates clicking the Add Record button. I am trying to do this process with no keyboard/mouse input. Everything works perfectly if they scan 5 items to every employee because the scanner tabs after the scan, but if they only scan 2 items, I need them to be able to scan a barcode to add that record in preparation for the next employee. I hope this makes sense, and thank you in advance!

 

[Candyman8019]

When an item is scanned, check to see if matches the 'Add Record' barcode. If it does, don't record the value in the cell...jump straight to the add record routine.

 

[JoeyGaspard]

When an item is scanned, check to see if matches the 'Add Record' barcode. If it does, don't record the value in the cell...jump straight to the add record routine.

Thank you for the reply, Im not sure what you mean, I dont have an Add Record barcode, that is what I am wanting help with.

 

[Candyman8019]

Create a barcode using the ‘barcode’ font with a value of 9999999. Or some unique number. Then when any barcode is scanned, if it equals that value then trigger the add record sub.

 

[JoeyGaspard]

Create a barcode using the ‘barcode’ font with a value of 9999999. Or some unique number. Then when any barcode is scanned, if it equals that value then trigger the add record sub.

Oh, I see what you are saying, I will try that, thank you so much!

 

[JoeyGaspard]

Create a barcode using the ‘barcode’ font with a value of 9999999. Or some unique number. Then when any barcode is scanned, if it equals that value then trigger the add record sub.

Sorry to bother, but are you saying to use something like an IIF statement?

 

[Candyman8019]

Difficult to provide direction without your current code...but when you scan a barcode, it will return a number..so you'll do something like:

If scan.value = "99999999" then AddRecord

 

[JoeyGaspard]

Difficult to provide direction without your current code...but when you scan a barcode, it will return a number..so you'll do something like:

If scan.value = "99999999" then AddRecord

I dont currently have code, I am trying to do this in an access form, basically what I want to happen is: if 999999 is entered into any of the fields labeled item1, item2, item3, item4, item5, then i want it to automatically add the record.

 

[Candyman8019]

When you say you want to "add record" what does that mean? Do you want to copy the values to another sheet? Other?

For your code you'll be looking at something like (assuming your values are being entered into range B1:B9:

Private Sub worksheet_change(ByVal target As Range)
If Not Intersect(target, Range("B1:B9")) Is Nothing Then
    If target.Value = "99999999" Then
        'do something here to add record
    End If
End If
End Sub

 

[JoeyGaspard]

When you say you want to "add record" what does that mean? Do you want to copy the values to another sheet? Other?

For your code you'll be looking at something like (assuming your values are being entered into range B1:B9:

Private Sub worksheet_change(ByVal target As Range)
If Not Intersect(target, Range("B1:B9")) Is Nothing Then
    If target.Value = "99999999" Then
        'do something here to add record
    End If
End If
End Sub

I want it to add the record and be ready to enter data into a new record. What happens with this is, an employee goes to our supply room for supplies, they may only need gloves for example, so after the clerk scans the barcode for gloves, the cursor goes to the next line, so at that point, i would like for them to scan the "Add Record" barcode to enter that record into the table and be ready for the next employee, if they get gloves, boots and a hardhat, after they scan those 3, the cursor will then be in Item 4 box, they would scan the Add Record barcode to enter that record and be ready for the next, I hope that makes sense. I understand I will have to put that code into each of the Item text boxes, but I am fine with that, Also, this in in Access, not Excel.