Valeur de base, ComboBox

Salut à tous,

Problème très simple, je cherche à définir la valeur initiale de ma ComboBox.

Dans cette exemple, la valeur est "aa":

Private Sub UserForm_Initialize()
Me.ComboBox1.Value = aa
End Sub

Mais sa marche pas du tout comme vous vous en douté. Je sais que dans les propriétés c'est possible mais ont peut pas y inclure de formule. L'objectif pour moi étant que ce soit =year(now()) !

Merci à vous,

Cdtl,

Salut,

Dans une combo box il faut d'abord ajouter un item (un choix possible) avant de lui donner une valeur.

Private Sub UserForm_Initialize()
Me.ComboBox1.AddItem (Year(Now()))
End Sub

Girodo

Ah oui,

Parce que j'avais pris les valeurs par rapport à une plage de cellule mais je vais faire comme tu dit. De toute manière c'est pour avoir les 3 années précédentes celle en cours, sa devrait allez.

Je test ça demain. Merci.

Cdlt,

Pour avoir les 3 dernières années c'est simple tu ajoutes 3 items !

Private Sub UserForm_Initialize()
Me.ComboBox1.AddItem (Year(Now()))
Me.ComboBox1.AddItem (Year(Now())-1)
Me.ComboBox1.AddItem (Year(Now())-2)
End Sub

Et si tu veux que par défaut il te propose l'année en cours tu rajoutes la ligne suivante :

Me.ComboBox1.Value = Year(Now())

Re, Et Salut,

Alors j'ai adopté ta solution, cela me permet de ne pas avoir à rentrer mes formules dans une plage de cellule pour définir les années.

Néanmoins quand j'ouvre mon Userform, aucune valeur n'est présente dans la combobox je suis obligé de sélectionner l'année.

Y'a t-il une solution à mon problème ?

Cdlt,

SOLUTION

Me.ComboBox.ListIndex = 0

J'avais répondu à ta question avant que tu la pose xD Tu n'a juste pas pris le temps de lire ma réponse jusqu'au bout :p

Nan nan nan girodo tu es un menteur

Tu m'avais écrit ".value"

Cdlt,

:p Tentes avec ma méthode tu verras que normalement ça fonctionne aussi

Girodo