Discussion :

[Shuki]

Bonjour

Besoin d'un conseil concernant l'affichage sous format date
dans une ComboBox (25/09/2009 18:10:39)

Voici mon petit problème: Je parts d'une liste dans excel faite à partir de la formule : maintenant() et dans les cellules au dessus et en dessous à cette cellule je rajoute à chaque fois 0.0105 soit un 1/4 d'heure. Cela représente une liste d'une quarantaine de cellules affichant la date par quart d'heure.
J'ai nommé cette liste et indique ce nom dans la comboBox rowsource.
Lorsque je clique sur la comboBox, la liste visuelle présentée est bien sous le format date idem les cellules excel, mais lorsque je selectionne une de ces dates dans la combobox pour la prendre en compte l'affichage est alors sous la forme (40081,75...).
J'ai essayé en déclarant une variable mais sans succès (je m'y prends certainement mal).
Si vous avez une solution ou une idée pour parvenir à l'affichage souhaité se serait super.

Merci à tous
Shuki

[oOVaveOo]

Bonsoir,

en déclarant une variable, oui, mais comment ?
as integer, as variant ou as date ?

[Shuki]

Bonjour

merci de me venir en aide
J'ai essayé en déclarant
dim infos as date
avec info = comboBOx text


j'en suis la

Merci de ton avis
Shuki

[Invité]

Essayez :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
Dim info as Date
 
Private Sub ComboBox1_Click()
info = ComboBox1.Value
End Sub

[Shuki]

Merci à oOVaveOo et Jacques Jean pour ces conseils .

J'ai essayé avec les infos transmises mais toujours le même résultat.
L'affichage est en chiffres et non en format date comme souhaité .

J'ai l'impression que ce format date ne fonctionne pas avec une comboBox


Merci à tous des conseils que vous pourriez me donner

Shuki

[jfontaine]

Bonjour,

En utilisant l'evenemnt change de la combobox

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
Private Sub ComboBox1_Change()
 
ComboBox1.Value = Format(ComboBox1.Value, "hh:mm")
 
End Sub

[Shuki]

Bonjour JFontaine

Super cela fonctionne

avec les infos données précedemment tout baigne l'affichage est comme souhaité

Merci à tous pour ces aides
j'espère avoir un jour les connaissances pour pouvoir aider les autres sur ce forum

Shuki