Combobox

[Philippe13]

Bonjour tout le monde

Juste un petit problème de débutant..
J'ai mis en pièce jointe un petit fichier. Il s'agit d'un fichier client.
J'ai un USF qu me sert de présentation, avec une Combox qui fait défiler les numéros de clients. A chaque numero de client, bien sûr des éléments correspondants qui s'affichent dans des textbox.
Les éléments sont pris dans la feuille "DONNEES" qui est ma source.

Ma combobox ne me sert qu'a visualiser les éléments et éventuellement renseigner les champs manquants, mais pas à creer un nouvel enregistrrement, car j'importe les n° clients directement dans la feuille.

Mon problème: Ma Combobox fonctionne mal, si je rentre un numéro pour une recherche, j'ia un msg d'erreur. De plus mes n° clients comencent tous par un "0" et apparaissent dans la liste déroulante, mais plus dans la combobox ensuite.

J'e n'arrive pas a trouver le code de sauvegarde lorsque je complète certains éléments de numéros clients. (J'ai essayé mas c'est la cata..)

Profitez-en pour corriger mon code et me dire ce qui ne va pas.

Merci pour votre aide si cela est possible.
Bonne journée à tous
Philippe13

 

[CHti160]

Salut "Philippe13"
Allez Lens Lool
bon pour le n° dans la Combobox1
j'ai mis cela et tu as l'affichage normal

Private Sub ComboBox1_Change()
'la Column 0 de la ComboBox existe, c'est celle du numéro de tél.

Me.ComboBox1.Value = Format(ComboBox1.Value, "00000000")

With Me
.TextBox1 = .ComboBox1.Column(1, .ComboBox1.ListIndex)
.TextBox2 = .ComboBox1.Column(2, .ComboBox1.ListIndex)
.TextBox3 = .ComboBox1.Column(3, .ComboBox1.ListIndex)
.TextBox4 = .ComboBox1.Column(4, .ComboBox1.ListIndex)
End With
End Sub
et d'un Lool
A+++
Jean Marie

 

[Philippe13]

Salut tut le monde
Salut Jean Marie

Merci pour ta rapidité. Et d'un point de solutionné....
Reste la sauvegarde qui n'agace et là je tourne en rond.
Mais on y arrivera,^

@++
Philippe

 

[Eric C]

Bonjour le forum
Bonjour Philippe, bonjour Jean Marie


Un fichier beaucoup plus adapté à ta demande car tu n'y arrivera pas avec ton fichier de départ, il te faut un new USF pour saisir tes news données.
Donc une démo de notre ami Thierry (Coucou Thierry, je sais que tu nous lis depuis ton bureau) beaucoup plus adaptée à tes besoins ==> <http://www.excel-downloads.com/html/French/forum/messages/1_65726_65726.htm>
P.S : Pour ma part, il n'y a pas possibilité d'ôter le Scorollbar horizontal dans la mesure où DES COLONNES sont attachées à l'initialization de ton Cbo.
@ ++ Eric C