DMAX in VBA, trying to get a 1 up to work.
Hey Guys and Gals,
Hoping someone can help me out with this. Scenario is, on new customer form (Customer Table Query) (yes thats the name of the form, I know bad conduct lol) If the Field (Customer Type) = "EMERGENCY RELIEF" then the "Membership Number" field, = Highest number in 'Membership Number' field in the Query (Customer Table Query)(yeah, i know really bad nameing, but kinda too late now). +1
Here is my attempts so far,
Private Sub CustomerType_AfterUpdate()
If [CustomerType] = "EMERGENCY RELIEF" Then
Membership Number = DMax("Membership Number", "Query!Customer Table Query") + 1
End If
End Sub
Any help would be greatly appreciated, Thankyou