PB valeur d'une combobox= une dateRésolu

Question

salut,
j'ai un probl&#233;me avec la valeur d'une combobox sur vba excel, en effet, je souhaiterais obliger la saissie d'une date dans le champ mais je n'arrive pas &#224; trouver le moyen pour dire que la combobox doit &#234;tre &#233;gal &#224; une date quelconque.
j'ai bien pens&#233;e donner une variable d&#233;clar&#233;e en string qui serait &#233;gal &#224; ""/""/"" mais tout peut-&#234;tre inscrit , je ne sais pas comment faire....
La date devrait s'&#233;crire de la forme dd/mm/aaaa ou encore dd/mm/aa
merci d'avance.
C&#233;dric

valtrase · Accepted Answer

Salut,
Un petit bout de code non test&#233; mais &#231;a devrait tourn&#233; tiens moi au courant

Private Sub ComboBox1_LostFocus()
If Not IsDate(ComboBox1.Value) Then
MsgBox "Vous devez entrer une valeur de Date"


ComboBox1.Text = ""
ComboBox1.Activate
End If


 


End Sub

Cordialement, Jean-Paul  
______________________________________________________________________

Le Savoir n'a de valeur que s'il est partag&#233;

crenaud76 · Answer

Mieux vaudrait utiliser l'EVT Validate() de ta combobox pour mettre le code valtrase

Christophe R

valtrase · Answer

Evenement Validate sous VBA  Pour excel ?
Par contre on peut rajouter la m&#233;thode format 

Cordialement, Jean-Paul  
______________________________________________________________________

Le Savoir n'a de valeur que s'il est partag&#233;

sobeit1 · Answer

merci bcp, le code a march&#233; impeccable &#224; l'exeption du "not "  puisque je souhaitais imposer une date.
Merci encore.
Cordialement C&#233;dric.

crenaud76 · Answer

D&#233;sol&#233; ! Savait aps que le Validate n'existait pas en VBA ! 


Christophe R