Logo GNT
Actualités Tests & Guides Bons Plans
Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11
Entraide Applications Microsoft Office Excel Ville et code postal dans Userform

Ville et code postal dans Userform

2 réponses
Avatar
Benji
Salut à tous,
Je début de chez début en vb et en fait jai un petit soucis que je vous
soumet.

J'ai une cellule "codepostal" (textbox) et une listbox "ville" qui pour le
moment est vide.
De plus, j'ai une feuille dans mon classeur excel qui s'appelle DATA avec :
- en colonne G : les codes postaux des villes de france
- en colonne H : les villes.
J'ai réussi a faire une fonction de sorte que quand je tape le code postal,
je fais apparaître ma ville dans une textbox mais le problème, c'est que je
n'arrive pas à tenir compte de toutes les villes quand il y en a plusieurs :
Exemple :
40530 LABENNE

1 occurence du 40530
mais
01090 FRANCHELEINS
01090 FRANCHELEINS
01090 FRANCHELEINS
01090 GENOUILLEUX
01090 GUEREINS
01090 LURCY
01090 MONTCEAUX
01090 MONTMERLE SUR SAONE

Beaucoup plus génant
En fait j'aimerais que quand je met 40530 ca me mette LABENNE dans la
listbox mais quand je met 01090, ca me propose l'ensemble des choix :)

J'espère etre bien clair lol
Merci bcp bcp bcp d'avance de votre aide
Cordialement
Benji
Signaler un problème avec ce contenu

2 réponses

Supprimer
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
Avatar
Elliac
Bonjour,

Essaie ce code (à adapter car je fonctionne avec 2 Combo) :
Private Sub ComboBox1_Change()
With UserForm1
L = Application.Match(Int(.ComboBox1.Value), Range("Codes"), 0)
N = Application.CountIf(Range("Codes"), .ComboBox1)
.ComboBox2.RowSource = Range(Range("h2").Offset(L - 1).Address,
Range("h2").Offset(L - 1 + N - 1).Address).Address
End With
End Sub

Camille

"Benji" wrote:

Salut à tous,
Je début de chez début en vb et en fait jai un petit soucis que je vous
soumet.

J'ai une cellule "codepostal" (textbox) et une listbox "ville" qui pour le
moment est vide.
De plus, j'ai une feuille dans mon classeur excel qui s'appelle DATA avec :
- en colonne G : les codes postaux des villes de france
- en colonne H : les villes.
J'ai réussi a faire une fonction de sorte que quand je tape le code postal,
je fais apparaître ma ville dans une textbox mais le problème, c'est que je
n'arrive pas à tenir compte de toutes les villes quand il y en a plusieurs :
Exemple :
40530 LABENNE

1 occurence du 40530
mais
01090 FRANCHELEINS
01090 FRANCHELEINS
01090 FRANCHELEINS
01090 GENOUILLEUX
01090 GUEREINS
01090 LURCY
01090 MONTCEAUX
01090 MONTMERLE SUR SAONE

Beaucoup plus génant
En fait j'aimerais que quand je met 40530 ca me mette LABENNE dans la
listbox mais quand je met 01090, ca me propose l'ensemble des choix :)

J'espère etre bien clair lol
Merci bcp bcp bcp d'avance de votre aide
Cordialement
Benji





Avatar
Céline Dion
"Benji" a écrit dans le message de news:
eaiUN%
Salut à tous,
Je début de chez début en vb et en fait jai un petit soucis que je vous
soumet.

J'ai une cellule "codepostal" (textbox) et une listbox "ville" qui pour le
moment est vide.
De plus, j'ai une feuille dans mon classeur excel qui s'appelle DATA avec
:
- en colonne G : les codes postaux des villes de france
- en colonne H : les villes.
J'ai réussi a faire une fonction de sorte que quand je tape le code
postal, je fais apparaître ma ville dans une textbox mais le problème,
c'est que je n'arrive pas à tenir compte de toutes les villes quand il y
en a plusieurs :
Exemple :
40530 LABENNE

1 occurence du 40530
mais
01090 FRANCHELEINS
01090 FRANCHELEINS
01090 FRANCHELEINS
01090 GENOUILLEUX
01090 GUEREINS
01090 LURCY
01090 MONTCEAUX
01090 MONTMERLE SUR SAONE

Beaucoup plus génant
En fait j'aimerais que quand je met 40530 ca me mette LABENNE dans la
listbox mais quand je met 01090, ca me propose l'ensemble des choix :)

J'espère etre bien clair lol
Merci bcp bcp bcp d'avance de votre aide
Cordialement
Benji


Bonjour,

Peut-être un exemple que tu peux adapter à ta guise
http://cjoint.com/?mopzqCtO1b

Cordialités
Céline D.