Your form is unbound so oncurrent event doesn't fire at all.
You need to use textbox1 and textbox3 events (after update or onchange) to calculate value of textbox5.
You have incorrect number of opening and closing brackets, and some in wrong place as well. try:
TotalExpenses: DSum("[tblExpenses]![ExpDeclarationValue]";"queInvoiceExpenses";"Month([tblExpenses]![ExpDate])=1 And [tblExpenses]![EmployeeID]=1")
Are you sending exactly same email to both addresses?
If so, then (regardless of what method you're using to send emails):
EmailTo=[Email 1] & ";" & [Email 2]
That wasn't my intention and you know it. I tried to save everybody's time answering same question on three different forums.
Meanwhile you turned it into "meaningful" conversation which I'm not going to continue.
I'm not. I just read all three forums and spotted a crosspost and decided to inform you among others. I apologize if I crossed the line.
That being said - are you a mod and want to decide what am I allowed to post?
Problem lays perhaps in how date picker in date/time fields works. When you click Today it inserts today's date at midnight. So if you want to record current time exactly you need to create custom button and use Now() function instead.
It's hard to advise anything without seeing your code or even db. If you won't find a solution I'd suggest uploading your database and be more specific about when and what happens, what your macros do, etc.
So what was the problem with doing your calculations in AfterUpdate or OnChange events of each L, W and H and putting result in Price textbox? You were asking about that yesterday AFAIR and...? That's how you want it to work, right?