Si "enter", alors, afficher nom untel ...

[herve80]

Bonjour,

Si la question a déjà été posée, merci de ne pas vous énerver.

Soit une liste déroulante dont on affiche le nom "a".
J'aimerais qu'en appuyant sur "enter", on passe à un autre nom bien précis.
Puis qu'en appuyant de nouveau sur "enter", de nouveau on passe à un autre nom. Etc.

Mais Excel refuse le if sendkeys "{enter}" then ...

Si vous pouviez m'aider, s'il vous plait ...

 

[GeoTrouvePas]

Re : Si "enter", alors, afficher nom untel ...

Difficilement compréhensible. C'est sur un Userform ? As tu essayé de d'utiliser ".SetFocus" ?

 

[herve80]

Re : Si "enter", alors, afficher nom untel ...

Je réexplique.

On a une liste de noms.

ex : Pascal
Eric
Marc
Hervé
Stéphane
Jacqueline

Le programme affiche Pascal au départ.
Si je fais "enter", il affiche Marc (et pas le nom suivant, mais un nom précis).
Puis si je fais "enter" après qu'il ait affiché Marc, il passe par exemple à Jacqueline ...

 

[GeoTrouvePas]

Re : Si "enter", alors, afficher nom untel ...

Ne sachant pas quelle logique détermine le passage d'un prénom à un autre, je ne peux que te proposer le code suivant :

Private Sub Combobox1_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)

If KeyCode = 13 Then
    If ComboBox1.Text = "Pascal" Then
        ComboBox1.Text = "Marc"
    Else
        If ComboBox1.Text = "Marc" Then
            ComboBox1.Text = "Jacqueline"
        Else
            '............
        End If
    End If
End If

End Sub

 

[herve80]

Re : Si "enter", alors, afficher nom untel ...

Bon, c'est pas encore ça.
Mais tu as au moins fait l'effort de trouver.

Bonne journée.

 

[GeoTrouvePas]

Re : Si "enter", alors, afficher nom untel ...

Bon, c'est pas encore ça.

Ben vu le peu d'informations que tu donnes, je risque pas de faire mieux que ça.

Soit une liste déroulante

Tu veux parler de listbox, combobox ou de liste de validation ?

Le programme affiche Pascal au départ.
Si je fais "enter", il affiche Marc (et pas le nom suivant, mais un nom précis).
Puis si je fais "enter" après qu'il ait affiché Marc, il passe par exemple à Jacqueline ...

Y a t il une logique dans cette succession de prénom ? As tu besoin de paramétrer l'ordre en amont ?

La qualité de la réponse est en fonction de la qualité de question. Donc sans précision de ta part, impossible de faire mieux.

 

[Habitude]

Re : Si "enter", alors, afficher nom untel ...

Peut-être

Private Sub Combobox1_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)

If KeyCode = 13 Then ComboBox1.ListIndex = IIf(ComboBox1.ListIndex = ComboBox1.ListCount - 1, 0, ComboBox1.ListIndex + 1)

End Sub