Update Query for multiple tables VBA

[WickidWe]

the code I have works fine.


How can I add another update to another table?

Add to query below: tblFunctions SET FctnSelected = True

dbs.Execute ("UPDATE tblEmpDetails SET IsVisible = False " _
& "WHERE EmpID='" & Me.listEmp.Column(0, varItm) & "'")

[ssanfu]

Using the same criteria??

Try

dbs.Execute ("UPDATE tblEmpDetails SET IsVisible = False WHERE EmpID='" & Me.listEmp.Column(0, varItm) & "'")

dbs.Execute ("UPDATE tblFunctions SET FctnSelected = True WHERE EmpID='" & Me.listEmp.Column(0, varItm) & "'")

Not really sure what you are asking......

[WickidWe]

thanks, also need to add an "AND" to the second one

Tac on to the "WHERE" somehow:
EmpID='" & Me.listEmp.Column(3, varItm) & "'

To:
dbs.Execute ("UPDATE tblFunctions SET FctnSelected = True WHERE EmpID='" & Me.listEmp.Column(0, varItm) & "'")

[ssanfu]

Your sentences are too short and unclear. Really difficult to decipher what you are asking.

Do you want

dbs.Execute ("UPDATE tblFunctions SET FctnSelected = True WHERE EmpID='" & Me.listEmp.Column(3, varItm) & "'")

or

dbs.Execute ("UPDATE tblFunctions SET FctnSelected = True WHERE EmpID='" & Me.listEmp.Column(0, varItm) & "' AND EmpID='" & Me.listEmp.Column(3, varItm) & "'")

The second one probably won't work because "EmpID" cannot be equal to Me.listEmp.Column(0, varItm) at the same time it is equal to Me.listEmp.Column(3, varItm)


Explain it like:
I want to update FctnSelected to TRUE in table tblFunctions when (Where) EmpID equals xxxx
and when a_SecondField equals yyyy