Tabbed forms and calendar control

[hockeylvr]

I have been using a calendar control on a subform and have now split the data into a tabbed form with 4 subforms. The calendar is now entering the date selected into the first record of each subform instead of just the one on the subform that has the focus.

Do I need to add the calendar control module to each subform now or is there a way to reference the correct form in my current code?

Private Sub Calendar_Click()

' Enters the selected date into the DateCompleted field


Forms![Training]![ElectiveTrainingSub].Form.[Date].Value = Me.Calendar.Value
Forms![Training]![CorpReqSubform].Form.[Date].Value = Me.Calendar.Value
Forms![Training]![XOGReqSub].Form.[Date].Value = Me.Calendar.Value
Forms![Training]![Recommended Training].Form.[Date].Value = Me.Calendar.Value

I have tried If Me!TabCtl159 = Me.Page160 (first tab) Then
'enter date into that record

with no luck

Any ideas would be appreciated as always!

Thanks,

Toni
__________________
Toni