bug lien entre combobox et textbox

Re : bug lien entre combobox et textbox

bonjour jetgirl

Vois si tu peux t'inspirer de ceci

Re : bug lien entre combobox et textbox

Bonjour le fil, jetgirl

Un exemple simple en PJ

A plus

Edition : Bonjour pierrejean. Je n'avais pas raffraichis...

Re : bug lien entre combobox et textbox

super merci beaucoup ça fonctionne! il me manque juste une petite info: quelle ligne de code dois-je rentrer pour que l'info de ma textbox s'inscrive ensuite dans mon tableau (excel me met une erreur quand je valide)

Merci!

Re : bug lien entre combobox et textbox

Re

Sans savoir ou est ton tableau ni avec quoi tu valides cela ne va pas etre tres facile !!!

Re : bug lien entre combobox et textbox

PierreJean

je profite de l'occasion .......
Vos posts sont tres souvent enrichissant pour mes petits neurones , et comme ce soir, vos reponses ou questions sont toujours formulees avec un humour des plus plaisant, meme si nos ennonces sont quelque peu confus je dois l'avouer .

alors j'en profite( au nom je suppose de tous les lecteurs silencieux et assidus du forum) pour vous remercier ainsi que les autres membres qui prennent sur leur temps libre , pour eclairer notre laborieux parcours initiatique.

Landsat

Re : bug lien entre combobox et textbox

j'ai mis une copie d'une partie de mon tableau. Je souhaiterais que le code postal s'affichant dans mon textbox se mette ensuite dans le tableau dans la colonne code postal. Est ce possible ?
le code que j'ai entré est le suivant (code d'archivage):

Private Sub CommandButton1_Click()

Sheets("CA").Select


Range("A14").Select
'Place toi sur la cellule B15'
Do
If ActiveCell.Value = "" Then
GoTo archiver
End If


If ActiveCell.Value <> "" Then
ActiveCell.Offset(1, 0).Select
End If


Loop Until ActiveCell.Value = ""


archiver:

ActiveCell.Value = UserForm2!Calendar1
ActiveCell.Offset(0, 1).Select
ActiveCell.Value = UserForm2!TextBox2
ActiveCell.Offset(0, 1).Select
ActiveCell.Value = UserForm2!ComboBox2
ActiveCell.Offset(0, 1).Select
ActiveCell.Value = UserForm2!ComboBox1
ActiveCell.Offset(0, 1).Select
ActiveCell.Value = UserForm2!TextBox4
ActiveCell.Offset(0, 1).Select

UserForm2!Calendar1 = ""
UserForm2!TextBox2 = ""
UserForm2!ComboBox1 = ""
UserForm2!ComboBox2 = ""

Range("G14").Select
'Place toi sur la cellule B15'
Do
If ActiveCell.Value = "" Then
GoTo Archive
End If

If ActiveCell.Value <> "" Then
ActiveCell.Offset(1, 0).Select
End If


Loop Until ActiveCell.Value = ""

Archive:

ActiveCell.Value = UserForm2!ComboBox3
ActiveCell.Offset(0, 1).Select

UserForm2!ComboBox3 = ""

Range("L14").Select
'Place toi sur la cellule B15'
Do
If ActiveCell.Value = "" Then
GoTo archiv
End If

If ActiveCell.Value <> "" Then
ActiveCell.Offset(1, 0).Select
End If


Loop Until ActiveCell.Value = ""

archiv:

ActiveCell.Value = UserForm2!TextBox3 * 1
ActiveCell.Offset(0, 1).Select


UserForm2!TextBox3 = ""

UserForm2.Hide
Sheets("CA").Select
End Sub

Quand je valide, excel me met un bug sur cette ligne:
Private Sub ComboBox1_Change()
TextBox4.Value = Me.ComboBox1.Column(1)

End Sub

Merci beaucoup pour votre aide🙂

Re : bug lien entre combobox et textbox

Re

@ Landsat
Je ne fais guère que donner ce que moi même ai recu ( 80% au moins de ce que je sais a été appris ici)

@ jetgirl
On progresse, on progresse
On a maintenant un morceau de tableau plus des tentatives vba
Ne manquent plus que l'userform et les données d'origine
Une copie de ton fichier avec quelques données rendues anonymes serait l'ideal

Re : bug lien entre combobox et textbox

je suis désolé de faire cela par petit bouts...voila une copie du fichier 🙂

Re : bug lien entre combobox et textbox

Re

j'ai mis un commandbutton supplementaire pour eviter de saboter ton travail

Re : bug lien entre combobox et textbox

merci beaucoup pour ton aide si précieuse cela fonctionne enfin après pas mal de difficultés et de recherches infructueuses! tu m'as d'ailleur fait découvrir une nouvelle méthode d'archivage beaucoup plus simple que celle que j'utilisais, alors un grand merci🙂