VBA: recupérer les jours selon le moi!!!

[kewell]

Bonjour tout le monde
Alors par souci de présentation j'ai créé un Userform afin de remplacer ma page d'acceuil Excel.
Ce Userform est composé de deux ComboBox:
Une pour les mois
L'autre pour les jour correspondant au mois choisi

Il a aussi deux boutons, un Valider un Quitter.

Dans la premiere ComboBox je recupere tous les mois placés dans une autre feuille.
Pour les recuperer je rentre ces lignes de programme:
Dim i As Integer
For i = 2 To Sheets('Feuil2').Range('D1').End(xlDown).Row
Me.ComboBox4.AddItem Sheets('Feuil2').Range('D' & i).Value
Next i

Seulement voila:
Dans la deuxiéme ComboBox je voudrais récuperer dans une liste ,ou tous les jours de l'année son rentrés,les jours correspondant au mois choisi. Avec les formules Excel DECALER j'arrive a le faire et sa fonctionne bien. Mais sous VBA je sais pas comment faire.
Quelqu'un a une idée??

Si il faut plus d'information n'hésitez pas...

Merci pour tout Kewell

 

[AV]

Salut,

A adapter :
http://cjoint.com/?gAk2Dm5fm8

AV [aaa]

 

[kewell]

Salut AV et le forum
Sympa ton aide, mais je t'avouerais que avec mon faible niveau j'arrive trop pas a l'adapter.

Parce que le truc que je veux garder (si c'est possible) c'est le fais de recuperer l'information dans une liste ou tout les jours de l'année sont inscrit. Cette liste varie selon l'année c'est pour sa qu'il est important que je la garde...

Je sais pas si tu touche en Excel, si c'est le cas voila l'affaire:
J'ai en colonne B l'année; en C tout les jour de l'année et en D tout les mois de l'année.

Sur une autre feuille en G11 et G12 j'ai mis pour liste de validation:
Données-->Validation-->Autoriser-->liste

En G11 j'ai mis =Ms plage de cellule correspondant aux mois de la colonne D

En G12
=DECALER(DateUn;EQUIV(G11;liste;0)-1;;JOUR(DATE(An;MOIS(G11)+1;0)))

An: c'est l'année
DateUn:01/01/2006 soit le debut de la plage ou tout les jours de l'année sont inscrit.
liste:correpond a la plage de tout le jour de l'année.

Je sais pas si tu as tout compris. Sa ressemble plus a une traduction de formule Excel en VBA je sais pas si c'est jouable. Si pour faire en sorte que sa marche il te faut ou vous faut plus d'informations n'hésitez pas...

En vous remerciant Dam

 

[AV]

''...Je sais pas si tu as tout compris...''

Pas vraiment car je vois pas le rapport entre la question initiale et ce contenu...
Quid de l'UF et des Combobox de la question originelle ?

Mets ton exemple avec les résultats attendus là :

http://cjoint.com

AV [aaa]

 

[kewell]

Re tout le monde et Re AV

Sympa le site des liens. Donc sur ce lien tu auras ma commande pour ouvrir ma Userform.
Sur la feuil1 tu as les liste.
Sur la feuil2 tu as se que j'ai comme syteme pour le moment.
Et feuil3 c'est la Userform que je voudrais.

En fait le dernier message explique se que j'ai pour le moment.


http://cjoint.com/?gAoHuG1psz

Merci pour tout Kewell