Vba

[madgicbobbyboon]

Bonjour,

J'ai une combobox (la combo4) qui représente les mois.
Je cherche lorsque je choisis le mois de Fevrier que dans la combo3 je ne puisse que choisir le nombre de jours correspondant a ce mois (28 ou 29)
idem pour le mois d'Avril ect...
J'ai cherché dans les solutions combobox en cascade mais en vain
je suis sur que c un code trop easy

 

[Dranreb]

Re : Vba

Bonjour,
Le nombre de jours d'un mois d'une année est donné par Day(DateSerial(An, Mois + 1, 0))

 

[madgicbobbyboon]

Re : Vba

Merci.

J'avais oublié de mettre mon fichier pour exemple

 

[Dranreb]

Re : Vba

Je dirais comme ça alors :

Private Sub Combobox4_change()
Dim DatTrv As Date
Set Ws = Worksheets("Personnel")
DatTrv = DateValue("1-" & ComboBox4.Text)
ComboBox3.List = Ws.[F1].Resize(Day(DateSerial(Year(DatTrv), Month(DatTrv) + 1, 0))).Value
ComboBox3.Visible = True
End Sub

 

[madgicbobbyboon]

Re : Vba

Impeccable.

Bon j'etais a 1000000 années lumiere de la réponse

Chapeau