Trade in your 2007 for 2003.

Mike F
"Joakim Norrman" <Joakim wrote in message
...
I have recently upgraded to Excel 2007 from Excel 97 and following code is
not working in Excel 2007:

Sub Test()
'Get name of active VB project
MsgBox Application.VBE.ActiveVBProject.Name
End Sub