Kalender aufrufen mit Doppelklick

DoCmd.OpenForm „frmKalender“, , , , , , Me.Name & „!“ & Me.ActiveControl.Name