Names are changed and still Syntax error in number in query expression '[Date_Added] = 02.04.2015 And [Shift] = '.
Both textbox fields are now un-formatted.
Label34.Caption = DLookup("[Spent_Hours]", "249_1_CHours", "[Date_Added]= " & Format(Me.Date1, "MM/DD/YYYY") & " And [Shift]...