Can you add some detail to the verbal description above?
Consider this example of Custom Object Properties.
FrmCalendar code
Dim fDate as Date
Public Property Get Date() As Date
Date = fDate
End Property
Public Property Let Date(Date As Date)
fDate = Date
End Property
Private Sub DatePicker_Click()
'Or whatever control is actually picking/setting the date to output to other forms.
fDate = 'Date picked
End Sub
To Pick a date in frmCalendar, use a code style like Sub DatePicker_Click
For a different UF to get a date from frmCalander
NewDate = frmCalendar.Date
For a different UF to assign a Date to frmCalendar
frmCalendar.Date = NewDate