Modif Calandar

[manuBX]

Bonjour à tous
pouvez vous me dire et comment est ce possible de modifier un userform calandar en y ajoutant les heures sur l userform pour les faire apparaitre dans la cellule désiée
et comment mettre le calandar quand on l ouvre à la date d ouverture

Merci d avance

 

[Paritec]

Re : Modif Calandar

Bonjour Manu
pour l'ouverture avec la bonne date
a+
papou 🙂

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

 

[JCGL]

Re : Modif Calandar

Bonjour à tous,

Peux-tu essayer en rajoutant dans le code de l'USF :

Private Sub UserForm_Initialize()
Calendar1 = Now
End Sub

A+ à tous

 

[Guest]

Re : Modif Calandar

bonjour,

Pour ajouter l'heure:

ActiveCell.Value = Calendar1.Value + TimeSerial(Val(ComboBox1.Value), 0, 0)

[Hello] Jc😀
A+

 

[Paritec]

Re : Modif Calandar

Bonjour Hasco JC manu le forum
voilà ton fichier en retour je pense que c'est ce que tu veux mais regardes
a+
Papou 🙂

 

[manuBX]

Re : Modif Calandar

Merci à tous

Vous m avez beaucoup aidé

Cordialement