Search results

When i tried running your code this problem started, i have now tried with another set of code that works on other peoples Databases, but the problem is still there

Hello everybody! I need Help!! When i try to run this set of VBA code: Private Sub Command24_Click() Dim BookingAvailable As Variant BookingAvailable = "Yes" If (Eval("=DLookUp(""[Viewing ID]"",""Viewing"",""Staff_Viewing_ID= Forms![Booking Screen]![AgentCombo] AND [Viewing Period]=...

ok lets try again :p Option Compare Database '------------------------------------------------------------ ' BookingCheckerV2 ' '------------------------------------------------------------ Function BookingCheckerV2() On Error GoTo BookingCheckerV2_Err Dim BookingAvailable As Variant...

the database is based on a estate agent, so i have created a booking screen where i want the macro to run to check if the data entered into the form is already in the table e.g. the property already has a viewing on the date and time entered. if its all ok then i want the marco to run an append...

Hi again Thanks its working to a point now, it dosent want to run the append query at the end or give me the confirming message box, any more ideas?

Thanks for the reply, i have no idea about VBA but heres the converted code, if its any help

Hey im new to the forums and desperately need some help! I am trying to run a macro which checks if the data which is being entered is already in the table, with error messages before running an append query at the end, however whenever i try to run the query i get a '2940 error' with all the...