Trie Sélection dans ListBox

Pierre31 · 19 Mai 2006

Bonjour à tous,

Voici mon problème, j'ai une liste variable de dates disposées en ligne et du type
janv-01 fevr-01 ... janv-04 fevr-04 ...
chaque date étant dans une cellule.

Comment je peux faire apparaÎtre dans une ListBox
uniquement l'année et sans doublon du genre
2001 2002 ... 2006

D'avance merci pour vos réponses

Cordialement
Pierre31

Hervé · 20 Mai 2006

bonsoir pierre

comme tu ne nous donnes geres de détail, voici un code qui remplit une listbox (sur une feuille), avec des années placées en colonne A.

Private Sub ListBox1_GotFocus()
Dim c As Range
Dim data As New Collection
Dim el

ListBox1.Clear

On Error Resume Next
For Each c In Range('a1:a' & Range('a65536').End(xlUp).Row)
data.Add Year(c), CStr(Year(c))
Next c
On Error GoTo 0

For Each el In data
ListBox1.AddItem el
Next el

End Sub

salut

ChTi160 · 20 Mai 2006

Salut Pierre31
Bonsoir Hervé (arff je viens pour te saluer )mais je ne viens pas les mains vides Lol
la version Dates en ligne
bonne fin de Soirée [file name=ImportDates.zip size=11328]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/ImportDates.zip[/file]

Pierre31 · 22 Mai 2006

Bonjour Hervé et ChTi160,

Excusez moi de ma réponse tardive mais je suis partis entre deux et me revoilà.
Merci pour vos réponses.
Effectivement je n'ais pas donné beaucoup de détail dans l'énoncé de mon problème mais vous avez répondu parfaitement à mon besoin
Merci encore
Bon après-midi
Cordialement
Pierre

Trie Sélection dans ListBox

Pierre31

Guest

Hervé

XLDnaute Barbatruc

ChTi160

XLDnaute Barbatruc

Pièces jointes

Pierre31

Guest

Discussions similaires

Trie Sélection dans ListBox

Pierre31

Guest

Hervé

XLDnaute Barbatruc

ChTi160

XLDnaute Barbatruc

Pièces jointes

Pierre31

Guest

Discussions similaires

Privacy & Transparency

Privacy & Transparency