Object Or Class Does Not Support The Set Of Events

[Steve P]

I have VBA code that was created in Word 2003 that is now being used in 2007
and I get an error on the following code:

Sub startup()
Dataentry.Calendar1.Value = Date
timeintervals
pullinfo
Dataentry.Show
End Sub

I also get the error on the timeintervals macros as follows:

Sub timeintervals()
'
Dim listitems(12)
listitems(0) = "6:00"
listitems(1) = "6:30"
listitems(2) = "7:00"
listitems(3) = "7:30"
listitems(4) = "8:00"
listitems(5) = "8:30"
listitems(6) = "9:00"
listitems(7) = "9:30"
listitems(8) = "10:00"
listitems(9) = "10:30"
listitems(10) = "11:00"
listitems(11) = "11:30"
listitems(12) = "12:00"
Dataentry.eventtime.List = listitems
Dataentry.eventtime.Value = listitems(3)
End Sub

The error being returned is:
Object Or Class Does Not Support The Set Of Events

What has changed in 2007 that does not support these calls?

Thanks,