Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Userform pour saisie d'heures

  • Initiateur de la discussion Initiateur de la discussion Denis
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

D

Denis

Guest
Bonjour à tous
comme souvent l'on rencontre des problèmes pour imposer un style de saisie,
ci-joint un petit USF pour saisir les heures selon un format imposé.
Testez le et dites moi si problème
Bon amusement à tous
Denis
 

Pièces jointes

Re : Userform pour saisie d'heures

Bonjour 13Gibe59
merci pour ton message
le problème vient de la conversion en xl97-2003.Ce prg a été fait sur 2007 et marche à priori bien.
Je regarde quel est le Pb
en attendant, ci-joint en version 2007
 

Pièces jointes

Re : Userform pour saisie d'heures

Bonjour Denis, 13GIBE59,

Le troisième fonctionne, même pour les heures avant 10, à condition de saisir 0825 par exemple...

Le premier impose 13 et je ne sais plus quoi, le deuxième, inexploitable.

Situation toujours utile... Merci et bonne soirée.

Jean-Pierre
 
Re : Userform pour saisie d'heures

Bonjour Denis, le forum,

Merci beaucoup pour ton userform qui tombe à point dans mon cas...

Je développe présentement une application qui sera utilisée pour saisir des horaires de travail...

Le problème que je rencontre avec ton userform, c'est que je ne peux modifier les heures affichées dans le textbox que s'électionnant le premier caractère du textebox et pour ce faire je dois placer mon curseur dans le textbox et faire la touche "backspace"...

Existe-t-il une façon d'automatiser le tout c'est-à-dire qu'en cliquant, en activant, en sélectionnant le textbox, le premier caratère des heures soit automatiquement activé et ainsi permettre facilement la modification ?

Très beau travail.....

Benoit Lord
 
Re : Userform pour saisie d'heures

Bonjour Le fil et le forum
Exact, pour la modification, dur, dur.
Je vais regarder ce qu'il est possible de faire dans le sens de l'idée que tu donnes.
à +
Denis
 
Re : Userform pour saisie d'heures

Bonjour Blord, le fil et le Forum
ci-joint une version améliorée (j'espère !)
j'i fait quelques essais, et je n'ai pas trouvé de problème à priori
A vous de me dire
Bon courage et à +
Denis
 

Pièces jointes

Re : Userform pour saisie d'heures

Bonjour à tous et à toutes

Le sujet date un peu mais je vais quand même essayer de le relancer,

j'ai trouvé que le code de Denis était plutôt pas mal,du coup je me suis dit,pourquoi pas l'adapter à mon projet.
Seulement voilà je doit l'adapter à 8 textbox ,cela fonctionne mais pas complètement , je m'explique,
lorsque je veux entrer par exemple "08:00" et que je commence ma saisi par le "8" et non pas par le "0" le curseur reste sur la dizaine d'heure au lieu de ce déplacer sur les heure comme il est censé le faire.

Problème lorsque j'appuis sur la touche TAB rien ne se passe impossible de changer de textbox via le clavier je suis obligé d'utiliser ma bonne vieille souris.

voila j'ai fait le tour de mes difficultées pour l'adaptation si quelqu'un suit encore ce sujet et qu'il ou elle à une idée je suis ouvert à toute proposition
 

Pièces jointes

Dernière modification par un modérateur:
Re : Userform pour saisie d'heures

Re bonjour,

Alors je viens de passer un petit moment à regarder ton code qui , je dois l'avouer est très très bien , à un détail près.... mais un détail qui a sont importance , lorsque que l'on revoie la valeur du texbox vers le tableur le format est reconnu comme texte et non pas comme format heure .
l'addition des heures n'est donc plus possible !!!!
si tu à une idée !!!!

@ plus
 
Re : Userform pour saisie d'heures

Re re bonjour,

Le problème semble être résolu il fallait bien insérer le fameux "Cdate" par contre l'insertion des textbox vide était bloqué du coup j'ai dû m'adapter en faisant une petite bidouille du genre :
Code:
If Me.TextBox1 <> "" Then
      .Cells(Ligne, "C") = CDate(Me.TextBox1)
      Else
      .Cells(Ligne, "C") = ""
    End If
je ne sait pas si c'est la meilleur des solutions mais ça à l'air de fonctionner 😛

je joins mon fichier pour que tu y jette un œil

@ plus et merci pour le coup de main
 

Pièces jointes

Dernière modification par un modérateur:
Re : Userform pour saisie d'heures

Une petite chose me chagrine quand même , c'est dommage qu'on ne puise pas corriger avec la touche <- une fois que les ":" soit apparut. l'avait tu remarquer ?
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

  • Question Question
Microsoft 365 Contrôle sur date
Réponses
8
Affichages
411
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…