Work with freelancers specializing in everything from database administration to programming, who have proven themselves as experts in their field. Hire the best, collaborate easily, pay securely, and get projects done right.
(SELECT TOP 1 [Payment Receipts].[Receipt Number] FROM [Payment Receipts] WHERE [Renter Space Assignments].[Space Number] = Forms![Rental Property Management]![Payment Receipts_Space Number] ORDER BY [Payment Receipts].[Receipt Number] DESC) Private Sub Payment_Receipts_Space_Number_AfterUpdate() Dim RecVar As Variant Dim MatchVar As Variant Dim TableVar As Variant MatchVar = Me![Payment Receipts_Space Number] TableVar = [Renter Space Assignments].[Space Number] RecVar = DLookup("[Receipt Number]", "Payment Receipts", "'" & TableVar & " = " & "'" & MatchVar & "'") Me![Receipt Number].SetFocus DoCmd.FindRecord (RecVar), acAnywhere, False, acSearchAll, False, acCurrent, True 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.