liste déroulante et vba

[Kacy]

Bonjour,

J'ai une liste déroulante avec des noms sur un formulaire. Pour chaque nom j'entre un age par exemple. Je voudrais que dès l'ouverture du formulaire le premier nom s'affiche dans la barre de la liste déroulante.

Après avoir rentré l'age je clique sur un bonton "valider" qui envoie la valeur dans mon tableau. Ainsi j'aimerai passer au nom suivant dès l'appuis sur ce bouton "valider".

Avez vous une idée pour faire cela?
Merci

 

[ferdhy]

Re : liste déroulante et vba

Salut,

essaie avec ceci:


Private Sub UserForm_Initialize()
Me.ComboBox1.RowSource = "Liste"
Me.ComboBox1.Value = Me.ComboBox1.List(0)

End Sub

Private Sub Validation()

' Après avoir mis ton code de validation

a = Me.ComboBox1.ListCount
b = Me.ComboBox1.ListIndex
If b <= a - 2 Then
MsgBox (b)
Me.ComboBox1.Value = Me.ComboBox1.List(b + 1)
Else
MsgBox ("plus d'enrégistrements!")
End If
End Sub

 

[kjin]

Re : liste déroulante et vba

Bonjour,
Je n'ai pas compris la finalité
A+
kjin

 

[ferdhy]

Re : liste déroulante et vba

Bonjour,

je pense qu'il veut que sa liste deroulante pointe sur le premier enrégistrement à l'initialisation du formulaire.
ensuite après qu'il ait validé, la liste deroulante pointe automatiquement sur l'enregistrement suivant de la liste.
ce que j'ai proposé ci haut.

A++

 

[Kacy]

Re : liste déroulante et vba

Merci beaucoup Ferdhy, j'ai utilisé ton code et ça marche impécablement bien.
Encore merci.