Date du jour automatique

[LB59]

Bonsoir, j'utilise actuellement un calendrier en USF pour un fichier excel, mais ce n'est pas moi qui l'ai fait, et je voudrais que lorsque je clique sur une des cellules prévues pour le faire apparaitre, la date du jour soit selectionnée par défaut.
Que faut-il rajouter dans le code du calendrier ?

Merci.

 

[Kobaya]

Re : Date du jour automatique

Salut lb59,

Quel ocx (ou autre) utilises-tu ? Attache ton fichier

 

[LB59]

Re : Date du jour automatique

heu...ocx ??? Ben en fait je ne sais meme pas ce que c'est, ou alors je sais ce que c'est, mais pas que ça s'apelle comme ça....lolll

J'ai ce code :

"Option Explicit

Private Sub Cld1_Click()

End Sub

Private Sub Cmd1_Click()
ActiveCell = Cld1.Value
Unload USF1
End Sub

Private Sub Cmd2_Click()
ActiveCell.ClearContents
Unload USF1
End Sub

Private Sub UserForm_Click()

End Sub"

Mais c'est tout ce que je peux te dire, enfin je pense...
Merci pour tes réponses.

 

[Kobaya]

Re : Date du jour automatique

L'objet Cld1 que tu utilises est une classe d'objet définie dans un fichier qui pourrait être un mscal.ocx, que tu vois dans le menu Outils/Références.... Microsoft Calendar Control 9.0.

Si c'est lui, fais :

Private Sub UserForm_Activate()
    Calendar1.Value = Date
End Sub

 

[LB59]

Re : Date du jour automatique

Merci pour ta réponse, mais je ne trouve pas où mettre cette modif, j'ai fait quelques essais, mais ça ne change rien...

 

[lacorse33]

Re : Date du jour automatique

Bonsoir LB59, Kobaya et le forum,

Pourrais-tu nous envoyer un fichier pour que l'on regarde ?

Merci
@+
Béa