Problème ListBox

Bonjour à tous.

Voilà mon problème.

J'ai créé un petit programme pouvant gérer les emplois du temps des personnels.

Quand je rentre les horaires du lundi, j'aimerai les dupliquer sur les autres jours grâce au code suivant

If DLundi.ListIndex <> -1 Then
        i = DLundi.ListIndex
        DMardi.ListIndex = i
        DMercredi.ListIndex = i
        DJeudi.ListIndex = i
        DVendredi.ListIndex = i
        DSamedi.ListIndex = i

        DMardi.Value = DLundi.Value
        DMercredi.Value = DLundi.Value
        DJeudi.Value = DLundi.Value
        DVendredi.Value = DLundi.Value
        DSamedi.Value = DLundi.Value
    End If
    MsgBox DLundi.Value & " / " & DMardi.Value & " / " & DMercredi.Value & " / " & DJeudi.Value & " / " & DVendredi.Value & " / " & DSamedi.Value

Et dans ma MsgBox j'obtiens : 7:00 / / / 7:00 / 7:00 /

Je ne comprends pas pourquoi DMardi, DMercredi et DSamedi n'ont pas aussi 7:00 comme valeur.

Pourtant j'écris bien DMardi.value = DLundi.value, je lui donne la même ligne dans listIndex (Oui car chaque liste on les même valeur)

Je vous remercie pour le temps que vous allez consacrer et si je n'ai pas été assez clair dites le moi

Bonjour toutes et tous

J'ai un gros doute pour 1 seule variable i pour Dlundi

ta variable i pour lundi, mardi mercredi etc.

i = DLundi.ListIndex pour ta listbox

un(e) expert(e) sur Excel, te répondras mieux que moi

bonne fête de fin d'année à tous

Bonjour Andre13

Ouais normalement elle ne sert à rien cette ligne, c'est à force de faire plein de tentative pour déjoué ce problème que j'en suis arrivé à là ^^

J'ai décidé de changer les ListBox par des ComboBox, avec le même code j'obtiens le résultat que je souhaite.

Donc je sais pas d'où vient le problème

Mais le problème avec le ComboBox c'est que l'on peut écrire dedans, ce que l'on ne peut pas faire avec ListBox du coup si quelqu'un connait comment faire

Merci

Bonjour

il faut mettre dans les propriétés de ta combobox : Style = 2

A+

Maurice

Merci beaucoup