Date dans userform avec TextBox

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 !

ptitgwen

XLDnaute Nouveau
Bonjour,

Toutes mes excuses si le sujet a déja été traité mais je ne trouve pas la solution à mon problème ni le topic idéal (étant novice dans vba)...

Mon problème provient d'une date à insérer dans une cellule par un userform et trois textBox

Sans titre.jpg

Lorsque je tape 10/05/2015 dans mes trois textbox ci-dessus, celui-ci me transforme dans ma cellule (B) en 05/10/2015.
Voici mon code vba:

Sans titre2.jpg
 

Pièces jointes

  • Sans titre.jpg
    Sans titre.jpg
    10.1 KB · Affichages: 18
  • Sans titre.jpg
    Sans titre.jpg
    10.1 KB · Affichages: 21
  • Sans titre2.jpg
    Sans titre2.jpg
    11.9 KB · Affichages: 22
  • Sans titre2.jpg
    Sans titre2.jpg
    11.9 KB · Affichages: 22
Re : Date dans userform avec TextBox

Toutes mes excuses pour la lisibilité mais en cliquant dessus, ça agrandit la fenêtre et ça devient lisible, enfin chez moi... 🙄

Je republie en plus grand. Désolé.

Sans titre.jpg

VBa:

Sans titre2.jpg

J'ai essayé votre solution mais je ne vois pas trop dans mon cas ou mettre le CDate.

ps: après relecture, le fichier reste petit... désolé. 🙁
 

Pièces jointes

  • Sans titre.jpg
    Sans titre.jpg
    18.3 KB · Affichages: 21
  • Sans titre.jpg
    Sans titre.jpg
    18.3 KB · Affichages: 20
  • Sans titre2.jpg
    Sans titre2.jpg
    11.6 KB · Affichages: 25
  • Sans titre2.jpg
    Sans titre2.jpg
    11.6 KB · Affichages: 25
Dernière édition:
Re : Date dans userform avec TextBox

Bjr ptitgwen, Pierrot

Je me permets, comme ça ? :

Code:
Range("B" & L).Value = CDate(IIf(TextBox2, TextBox2.Value, "") & "/" & IIf(TextBox5, TextBox5.Value, "") & "/" & IIf(TextBox6, TextBox6.Value, ""))

Cordialement, Gérard
 
- 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

Discussions similaires

  • Question Question
Microsoft 365 Problème de date
Réponses
5
Affichages
163
Réponses
6
Affichages
303
Retour