Trying to find the best method to perform the functions detailed below. Very new to using excel as an interactive interface with a userform, oh and VBA. Any direction would be much appreciated as I have reached an impasse. I did get other functions on userform1 to work. These are pretty much the last two. I have read about vlookup, index/match, find, search etc.. just not sure as I am a novice. Coding is so much more difficult then PLC ladder.
Code:
Private Sub ScanAssociateID_Click()
Worksheets("AssociateTable").Select
Range("A1").Select
'Associate scans ID badge after clicking userform1 ScanAssoicateID command button. The code below will scan input into sheet2 cell A1 and perform a lookup or match in column B. If found
'Assoicate name in column C will populate userform1 AssociateID textbox and sheet4 (Report) column D . If not found will display message box indicating Associate
'not found.
AssociateID.Value = Sheet2.Range("A1").Value 'Really should be the Associate or user name that was a match to scanned input in A1
End Sub
Code:
Private Sub ScanStandardRFID_Click()
Worksheets("StandardTable").Select
Range("A1").Select
'Associate scans RFID tag attached to standard after clicking userform1 ScanStandardRFID command button . The code below will scan input into sheet3 cell A1 and perform a lookup or match in column B.
'If found, Standard ID and description will populate sheet4 column A and B respectively and add userform1 Associate ID value to sheet4 column D as well as
'now time stamp in checked out column E in the next availible row. If standard is already checked out values should populate the checked in column F and
'overwrite the assoicate name with lastest Associate ID value from userform1.
'In additon to the functions above during RFID scan the userform1 vendorcombobox value should be added to column C in the same row.
'RFIDDescription textbox on userform1 gets populated with the match result from scan or message that says not found.
RFIDDescription.Value = Sheet3.Range("A1").Value 'Really should be the standards description that was a match to scanned input in A1
End Sub