Blockchain technology has already revolutionized finance thanks to Bitcoin. Now it's disrupting other areas, including the realm of data protection. Learn how blockchain is now being used to authenticate backup files and keep them safe from hackers.
Private Sub lboDates_Click() Dim lngEmployee As Long lngEmployee = DLookup("[Employee]", "[tblData]", "[Room]='" + Me.cboRoom.Column(1) + "'") 'This DLookup works fine, returns a long with the correct Employee ID Dim strEmployeeName As String strEmployeeName = DLookup("[FirstName]", "[tblEmployees]", "[ID]=" + lngEmployee) 'Here is where the error occurs. I've tried adding single quotes before and after, but that still won't do anything. MsgBox (strEmployeeName) 'This is just a test MsgBox to see if it works. I always get the error before getting to this point. End Sub
Add your voice to the tech community where 5M+ people just like you are talking about what matters.
Join the community of 500,000 technology professionals and ask your questions.