Microsoft 365 ComboBox format date

  • Initiateur de la discussion Initiateur de la discussion juju91
  • 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 !

juju91

XLDnaute Junior
Bonjour à tous
Voici mon problème.
J'ai un comboBox dans une feuille qui est alimenté par des données au format dates.
Jai ''réussis'' à mettre le format que je souhaitais dan le ComboBox "JJJJ JJ MMMM AAAA''
Mais j'ai besoin que la cellule lié, qui reçoit la date sélection soit elle en format date ''classique'', cas j'ai des forme qui s'effectue par rapport à la valeur mise dans la cellule lié .
Je ne sais pas si je suis trés clair dans je mets un exemple de ce que je souhaiterais.
Si une personne pouvez m'aiguiller ....

Par avance merci.
 

Pièces jointes

Bonsoir.
Comme ça on dirait ça va à peu près :
VB:
Option Explicit
Private ExecInduite As Boolean
Private Sub ComboBox1_Change(): If ExecInduite Then Exit Sub
   Dim Dt As Date
   Dt = CDate(Mid$(ComboBox1.Text, InStr(ComboBox1.Text, " ") + 1))
   ComboBox1.LinkedCell = ""
   With [C2]: .NumberFormat = "dddd dd mmm yyyy": .Value = Dt: End With
   ExecInduite = True
   ComboBox1.Value = Format(Dt, "dddd dd mmm yyyy")
   ExecInduite = False
   End Sub
 
- 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

Réponses
6
Affichages
597
Réponses
12
Affichages
471
Réponses
4
Affichages
289
  • Question Question
Microsoft 365 erreur de date
Réponses
2
Affichages
457
Retour