message d'erreur lorsque je lance le calendrier

[guillaume30c]

Bonsoir à tous,

J'ai "crée" un calendrier sur excel, sous Windows 7, de la façon suivante:

Insertion userform1 dans VBA/ affichage / barre à outils / clic droit contrôle supplémentaires / je coche contrôle calendrier 12.0 et je le dessine dans le userform

Puis dans feuil1 je met:

Code :

1
2
3
4
5
6
7
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Not Intersect(Target, Range("B6")) Is Nothing Then
    UserForm1.Show
    Cancel = True
End If
 
End Sub

Rien de bien compliquer pourtant lorsque je lance le fichier sur une autre machine, sous Windows Vista et avec une version différente d'Excel, un message d'erreur apparaît: "Impossible de charger le objet car il n'est pas disponible sur cette machine"

J'ai beau chercher sur internet je ne vois pas d'où vient l'erreur!!

Quelqu'un peut il m'aider !?

Merci et bonne soirée

Guillaume.

[kiki29]

Salut, en principe le composant Calendrier est installé à partir d'une version dite "Pro" càd avec Access, enfin jadis c'était le cas.Sinon voir http://excel.developpez.com/faq/?pag...nstallMSCOMCT2

[psawyer]

*Bonjour,*
Voici une solution qui pourrait reglé le problème: PickDateForm.xls