probleme d'affichage des heures dans une liste déroulante

[colosse]

Bonsoir
je suis totalement neophite sur excel
j'ai créé un fichier excel pour comptabiliser des heures de travail
cela fonctionne correctement (grace à excel-downloads).
Sur certaines cellules j'utilise la fonction "données/validation des données/liste déroulante dans la cellule" avec en source une plage de cellules contenue sur une 2ème feuille, mais je trouve que le texte dans la liste deroulante est trop petite.

J'ai donc essayé d'inserer une listbox pour remplacer ces menus (voir cellules J47àJ55 du fichier joint), j'y suis arrivé mais l'affichage de celle-ci n'est pas correct, cela m'affiche des chiffres avec des virgules au lieu de m'afficher une heure au format hh:mm
j'ai vraiment cherché mais je ne trouve pas de solution
quelqu'un a peut etre la solution?
merci d'avance et bravo pour ce super forum
Rod.

 

[wilfried_42]

Re : probleme d'affichage des heures dans une liste déroulante

Bonjour

Ce n'est pas un listBox, mais un Menu Popup (Menu Contextuel)

With cb.Controls.Add(msoControlButton, 1, , , True)
.Caption = Format(liste(i), "hh""H ""mm""Mn""")
.OnAction = "gw_lance(" & i & ")"
End With

 

[wilfried_42]

Re : probleme d'affichage des heures dans une liste déroulante

re:

j'ai modifié aussi la recup de l'heure, probleme de format

Public cb As CommandBar
[COLOR="red"]Public liste As Range[/COLOR]
Sub cre_menu()
    Set liste = Range("heures")
    If liste.Column > 1 Then Exit Sub
    
    Dim i As Long, nbl As Long
    
    On Error Resume Next
    CommandBars("Menu_Gw").Delete
    On Error GoTo 0
    
    Set cb = Application.CommandBars.Add("Menu_Gw", msoBarPopup)
    nbl = liste.Count
    For i = 1 To nbl
        With cb.Controls.Add(msoControlButton, 1, , , True)
            .Caption = [COLOR="red"]Format(liste(i), "hh""H ""mm""Mn""")[/COLOR]
            .OnAction = "gw_lance(" & i & ")"
        End With
    Next i
    cb.ShowPopup
End Sub
Sub gw_lance(index As Long)
    [COLOR="Red"]ActiveCell = liste(index)[/COLOR]
End Sub

en rouge la recap des modifications

 

[colosse]

Re : probleme d'affichage des heures dans une liste déroulante

fabuleux
Merci beaucoup wilfried
je reupload le fichier modifé pour ceux que ça interresse
Merci encore
Rod.

 

[jfrancois]

Re : probleme d'affichage des heures dans une liste déroulante

alors la je dit chapeau car ca fait un moment que je recherche un tableau comme ca

merci encore