J'ai une feuille avec en colonne A, des codes postaux et=20
en colonne B les villes y correspondantes...
Dans un UserForm, j'ai une Combo qui pointe sur les villes.
Ce que j'aimerai pouvoir faire, c'est si je choisi une=20
ville dans la Combo, et bien dans un TextBox j'ai le code=20
postal correspondant =E0 cette ville qui viendrai=20
automatiquement...
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
garnote
Salut Sabian,
J'ai nommé «codes» la plage des codes postaux et utilisé cette macro :
Private Sub ComboBox1_Change() L = ComboBox1.ListIndex + 1 TextBox1 = Range("codes")(L) End Sub
Ça semble fonctionner.
Serge
"Sabian" a écrit dans le message de news: 0eb101c3a3b6$5710ccc0$ salut...
J'ai une feuille avec en colonne A, des codes postaux et en colonne B les villes y correspondantes...
Dans un UserForm, j'ai une Combo qui pointe sur les villes.
Ce que j'aimerai pouvoir faire, c'est si je choisi une ville dans la Combo, et bien dans un TextBox j'ai le code postal correspondant à cette ville qui viendrai automatiquement...
Merci pour votre aide
Salut Sabian,
J'ai nommé «codes» la plage des codes postaux
et utilisé cette macro :
Private Sub ComboBox1_Change()
L = ComboBox1.ListIndex + 1
TextBox1 = Range("codes")(L)
End Sub
Ça semble fonctionner.
Serge
"Sabian" <sab@ian.com> a écrit dans le message de news:
0eb101c3a3b6$5710ccc0$a601280a@phx.gbl...
salut...
J'ai une feuille avec en colonne A, des codes postaux et
en colonne B les villes y correspondantes...
Dans un UserForm, j'ai une Combo qui pointe sur les villes.
Ce que j'aimerai pouvoir faire, c'est si je choisi une
ville dans la Combo, et bien dans un TextBox j'ai le code
postal correspondant à cette ville qui viendrai
automatiquement...
J'ai nommé «codes» la plage des codes postaux et utilisé cette macro :
Private Sub ComboBox1_Change() L = ComboBox1.ListIndex + 1 TextBox1 = Range("codes")(L) End Sub
Ça semble fonctionner.
Serge
"Sabian" a écrit dans le message de news: 0eb101c3a3b6$5710ccc0$ salut...
J'ai une feuille avec en colonne A, des codes postaux et en colonne B les villes y correspondantes...
Dans un UserForm, j'ai une Combo qui pointe sur les villes.
Ce que j'aimerai pouvoir faire, c'est si je choisi une ville dans la Combo, et bien dans un TextBox j'ai le code postal correspondant à cette ville qui viendrai automatiquement...
Merci pour votre aide
Sabian
Ca semble pas... ça fonctionne nickel...
Merci mille fois...
a++
-----Message d'origine----- Salut Sabian,
J'ai nommé «codes» la plage des codes postaux et utilisé cette macro :
Private Sub ComboBox1_Change() L = ComboBox1.ListIndex + 1 TextBox1 = Range("codes")(L) End Sub
Ça semble fonctionner.
Serge
"Sabian" a écrit dans le message de news: 0eb101c3a3b6$5710ccc0$ salut...
J'ai une feuille avec en colonne A, des codes postaux et en colonne B les villes y correspondantes...
Dans un UserForm, j'ai une Combo qui pointe sur les villes.
Ce que j'aimerai pouvoir faire, c'est si je choisi une ville dans la Combo, et bien dans un TextBox j'ai le code postal correspondant à cette ville qui viendrai automatiquement...
Merci pour votre aide
.
Ca semble pas... ça fonctionne nickel...
Merci mille fois...
a++
-----Message d'origine-----
Salut Sabian,
J'ai nommé «codes» la plage des codes postaux
et utilisé cette macro :
Private Sub ComboBox1_Change()
L = ComboBox1.ListIndex + 1
TextBox1 = Range("codes")(L)
End Sub
Ça semble fonctionner.
Serge
"Sabian" <sab@ian.com> a écrit dans le message de news:
0eb101c3a3b6$5710ccc0$a601280a@phx.gbl...
salut...
J'ai une feuille avec en colonne A, des codes postaux et
en colonne B les villes y correspondantes...
Dans un UserForm, j'ai une Combo qui pointe sur les
villes.
Ce que j'aimerai pouvoir faire, c'est si je choisi une
ville dans la Combo, et bien dans un TextBox j'ai le code
postal correspondant à cette ville qui viendrai
automatiquement...
J'ai nommé «codes» la plage des codes postaux et utilisé cette macro :
Private Sub ComboBox1_Change() L = ComboBox1.ListIndex + 1 TextBox1 = Range("codes")(L) End Sub
Ça semble fonctionner.
Serge
"Sabian" a écrit dans le message de news: 0eb101c3a3b6$5710ccc0$ salut...
J'ai une feuille avec en colonne A, des codes postaux et en colonne B les villes y correspondantes...
Dans un UserForm, j'ai une Combo qui pointe sur les villes.
Ce que j'aimerai pouvoir faire, c'est si je choisi une ville dans la Combo, et bien dans un TextBox j'ai le code postal correspondant à cette ville qui viendrai automatiquement...