ComboBox sur les mois

thunder23

XLDnaute Occasionnel
Bonsoir le forum,

Je souhaiterais utiliser une combobox affichant les mois pour pouvoir modifier la période mensuelle sur mon planning sans trouver se que je recherche sur les forum. J'ai mis un fichier en pièce jointe pour plus d'explications.

Merci
 

Pièces jointes

  • testmois.xlsx
    19.5 KB · Affichages: 11

fanch55

XLDnaute Barbatruc
Bonsoir,
Via VBE , dans
Microsoft Excel Objects/Thisworkbook
VB:
Private Sub Workbook_Open()
    With Sheets("Feuil1").ComboBox2
        .Clear
        For i = 1 To 12
            .AddItem Format(DateSerial(1, i, 1), "mmmm")
        Next
        .ListIndex = 0
    End With
End Sub
Microsoft Excel Objects/Feuil1
VB:
Private Sub CommandButton3_Click()
    [ComboBox2].ListIndex = _
    WorksheetFunction.Min([ComboBox2].ListIndex + 1, [ComboBox2].ListCount - 1)
End Sub
Private Sub CommandButton4_Click()
    [ComboBox2].ListIndex = _
    WorksheetFunction.Max([ComboBox2].ListIndex - 1, 0)
End Sub
 
Dernière édition:

thunder23

XLDnaute Occasionnel
Bonsoir fanch55, bonsoir mapomme,

Merci à vous deux pour vos réponses, difficile de choisir entre les deux mais celle de mapomme sans avoir besoin de VBA permet de "déconfiner" (lol) du code VBA :D.
En tout cas oui espérons que d'ici 2029 on soit déconfiné ;)

Merci encore ;)
 

Statistiques des forums

Discussions
312 201
Messages
2 086 171
Membres
103 152
dernier inscrit
Karibu