Date et Heures

[Dydou76]

Bonjours,

après quelque mois je reviens vers vous et voila mon souci. Je fait un fichier Excel pour gérer un planning avec un userform qui à 2 listes déroulantes, une pour les prise de service et l'autre pour les fin de service. Je voudrai sélectionner ces heures et qu'elles s'inscrive dans mon tableau Excel par rapport à une date sélectionnée dans l'userform. Je vous ai mis un fichier model, il faut cliquer sur le bouton pour ouvrir l'userform. En esperant que je me suis bien fait comprendre lol.
Merci d'avance

 

[Bebere]

bonjour
bienvenue Dydou
bien compléter les rubriques.Si besoin il est possible d'améliorer
changer le code userform et amélioré formules
ne fonctionne que pour Denis

 

[Dydou76]

Bonjour, et merci d'avoir pris du temps pour mon fichier. J'ai tester et quand je sélectionne une date, les infos ne se mettent pas sur la ligne correspondante à la date choisi dans l'userform. et je ne trouvez pas comment faire. Sinon pour le combobox1, je vais créer un onglet par employer afin de faire fonctionner un seul userform pour tout le monde.
Merci encore Bebere !!!

 

[Bebere]

Dydou oubli de ma part,il faut modifier la ligne L=...

Private Sub CommandButton1_Click()
    Dim L As Long
    L = DateDiff("d", "01/01/2017", DTPicker1) + 2'ligne modifiée
    Worksheets(Me.ComboBox1.Text).Range("B" & L) = CDate(Me.ComboBox2)
    Worksheets(Me.ComboBox1.Text).Range("C" & L) = CDate(Me.ComboBox3)
    Worksheets(Me.ComboBox1.Text).Range("E" & L) = Me.ComboBox4
End Sub

 

[herve62]

bonsoir
J'interviens juste pour un précision
Je vois du "Calendrier" !! je me décarcasse depuis 2 ans avec , car je suis en 2010 et théoriquement
DTPicker, Calendar ... ne fonctionne plus ( il y a des post ici sur ce sujet)
Et là je teste, la box de l'USF m'affiche bien un calendrier ????
Juste un détail , le fichier est le votre ( 2003 ou 2007) et chez moi il a mis un petit moment pour s'ouvrir avec un calcul ( sous office) avec 2 processeur .. ?
Je cherche donc l'explication , je ne peux pas créer de calendrier sous 2010 !

 

[Bebere]

bonsoir Hervé
Dydou je ne sais pas mais de mon côté je teste 2010 depuis un bout de temps
pourquoi cela fonctionne cette fois de mon côté?
j'employe un calendrier fait maison et pas de problème
je vais essayer datepicker pour voir
edit : dans contrôles supplémentaires j'ai activé CalendarControl 11.0 et c'est ok
maintenant il faut voir avec d'autres

 

[Dydou76]

super ça marche maintenant je vais essayer de mettre d'autre onglet pour les autres employer. Et eviter les bug quand on ne remplis pas un des combobox. Mille merci

 

[Dydou76]

Bonjour a tous, le calendrier qui es dans mon fichier, je l'ai créer grâce a un tuto sur You tube.

 

[herve62]

Bonjour
Bebere : Au temps pour moi , j'ai confondu avec une appli du bureau , nous étions en 2013 (maintenant 2016) et là sûr cela ne fonctionne plus , c'est Roland qui m'avait créé un calendrier pour remplacer

 

[Dydou76]

Re-Bonjour,
je ne trouve pas pour mettre le DTPicker1 à la date du jour !!! j'ai essayer DTPicker1.date et now mais ca ne marche pas. Pourriez vous m'aider SVP Merci d'avance

 

[herve62]

Il y a un truc bizarre chez moi avec ton fichier : Format (now() ....... plante ? à Sub initialyze (pour l'usf)
Je teste dans un fichier que je créé ...ça fonctionne ?

 

[Bebere]

bonjour
Dydou ajout datepicker quis'installe avec la date du jour,regarde dans userform_initialize
Hervé pas d'erreur içi avec le code,tu peux changer now par date pour la date

 

[herve62]

Re
Bebere : comme j'aime bien comprendre jusqu'au bout , je laisse le fichier de Dydou légérement modifié ( juste en Init.) et dans ce fichier ça plante ?
Si je créé un nouveau , copie juste son USF en ne mets que la Sub Init : c'est OK ??
Je laisse les 2 fichiers celui de Dydou qui plante en sub init., et le nouveau avec juste copie d'un bout de l'usf qui fonctionne
je pige pas ?

 

[Dydou76]

Merci beaucoup Bebere ça marche !!! Je continu mon p'tit programme mais j'aurai probablement encore besoin de vos lumière lol je suis très débutant en VBA. Si tu à une idée pour améliorer la chose je suis preneur ;-)
Bonne journée a tous et encore merci

 

[Dydou76]

Oups re bonjour,
je voudrai que dans mon textbox1 m'indique le nombre de fois qu'il y à "CP" dans la colonne "D" c'est dans cette colonne que j'indique si je suis en CP ou en Repos ou si c'est un jour férié. Ce qui permet aux employés(e) de savoir combien ils leurs restent de CP en ouvrant le tableau de bord. J'ai essayer avec une mise en forme conditionnelle ça fonction dans les cellules mais ça ne s'inscrit pas dans mon textbox. Merci encore lol