errore run time 424 su mscalc.ocx

[piter123]

Salve, ho creato un foglio che tramite un commandbutton
l'apertura di un calendario, per la precisione l'oggeto mscalc.ocx di office.
Se copio questo file su alcuni pc però alla pressione del pulsante mi dà errore runtime 424, come posso risolvere (dipende per caso dall'attivazione dell activex, se si, come devo fare per attivarle)

Grazie, posto di seguito il banale codice della pressione del pulsante

Private Sub COMMANDBUTTON1_Click()
If Calendar1.Visible = True Then
Calendar1.Visible = False
Else
Calendar1.Visible = True
End If
End Sub

[piter123]

inoltre mi dice necessario oggetto, come se mancasse il file mscalc.ocx, che in realtà c'è e in vb-strumenti-riferimenti è selzionato sotto la voce microsoft calendar control 11