Trying to call the MS project in the Access Module, but I'm having trouble with the syntax. Basically I'm looping through both to compare the ID and if they match, update another cell.
Here's what I have so far
Dim rs As DAO.Recordset
Set rs = CurrentDb.OpenRecordset("Select * From ['Access'])
AllForms='MS Project'
While Not rs.EOF
While Not AllForms.EOF
If ('Access Column')=('MS Project Column') Then
'Access Cell' = 'Ms Project Cell'
End if
Allforms.MoveNext
Wend
rs.MoveNext
Wend