Excel 2007 workbook_open events are not working

Hi,
I have my lab computer upgraded from Excel 2003 to Excel 2007. Follwing code is not working on this computer.

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
ThisWorkbook.Worksheets("summary").Range("d5") = Environ$("username")
ThisWorkbook.Worksheets("summary").Range("d6") = Now()
End Sub

Private Sub Workbook_open()
ThisWorkbook.Worksheets("summary").Range("d7") = Environ$("username")
ThisWorkbook.Worksheets("summary").Range("d8") = Now()
End Sub

The error is "Run Time Error 57121 Application defined or Object defined error'
My new Laptop has Excel 2007 insatlled by default( I mean not upgraded from Excel 2003) and the above code works well. Any idea what is happening?

Your post does not comply with Rule 1 of our Forum RULES. Your post title should accurately and concisely describe your problem, not your anticipated solution. Use terms appropriate to a Google search. Poor thread titles, like Please Help, Urgent, Need Help, Formula Problem, Code Problem, and Need Advice will be addressed according to the OP's experience in the forum: If you have less than 10 posts, expect (and respond to) a request to change your thread title. If you have 10 or more posts, expect your post to be locked, so you can start a new thread with an appropriate title.
To change a Title on your post, click EDIT then Go Advanced and change your title, if 2 days have passed ask a moderator to do it for you.