2 combo dans une textbox x 37

A

alex67800

XLDnaute Impliqué

• 12 Janvier 2009

• #2

Re : 2 combo dans une textbox x 37

Bonjour Onyx41,
Pourrais-tu être plus clair?
malgré ton fichier je ne vois pas par quoi sont alimenté les textbox!

Voilà mon problème, je souhaiterais, à l'aide de 2 combo remplir la 1ère textbox, mais aussi les suivantes sans pour autant modifier la première rentrée

Cliquez pour agrandir...

Quelle première entrée?

 

Vote positif 0 Vote négatif

O

onyx41

Guest

• 12 Janvier 2009

• #3

Re : 2 combo dans une textbox x 37

Salut Alex, et merci de venir m'aider

je choisi "janvier" sur la combo 1 et "2009 "sur la combo 2, et que les 2 alimentent ma textbox comme "janvier 2009". facile à expliquer dans la tête, plus difficile à l'écrire.

 

Vote positif 0 Vote négatif

O

onyx41

Guest

• 13 Janvier 2009

• #4

Re : 2 combo dans une textbox x 37

Bonjour à tous,

J'ai trouvé la solution pour renvoyé dans la textbox par le code tout simple de :

Private Sub Tx1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
Tx1.Value = Cb1.Value + Cb2.Value
End Sub

Seulement, comment faire pour que ça s'inscrive directement sans double cliquer sur la combo ?

 

Vote positif 0 Vote négatif

A

alex67800

XLDnaute Impliqué

• 13 Janvier 2009

• #5

Re : 2 combo dans une textbox x 37

Bonjour onyx41,
avec combobox2_change!
puis ton Txt1.value= CB1.value + Cb2.value
CB1.value + Cb2.value, ne serait-ce pas plutôt CB1.value & "" &CB2.value?

Edit: Dans ton fichier essai tu as 2 textbox? Par quoi est alimenté la seconde?
Si une par Cb1 et l'autre Cb2, ben il te suffit de mettre le code dans chaque CB_change.

 

Vote positif 0 Vote négatif

O

onyx41

Guest

• 13 Janvier 2009

• #6

Re : 2 combo dans une textbox x 37

ça fonctionne nettement mieux, merci Alex.

La seconde textbox doit être alimentée de la même façon, par des combo mais n'aura pas la même valeur, donc, faut-il que je crée 2 combo pour chaque textbox ou y a t'il un moyen de n'avoir que 2 combo qui d'une façon ou d'une autre pourra alimenté les autres textbox...oui, je sais, pas facile à expliquer..

 

Vote positif 0 Vote négatif

A

alex67800

XLDnaute Impliqué

• 13 Janvier 2009

• #7

Re : 2 combo dans une textbox x 37

Re,
En même temps je ne vois pas pourquoi tu veux alimenter des textbox par des combo, car si comme je le suppose tes donnes iront sur un base de données! Donc pourquoi ne pas mettre de suite les valeurs de tes combos vers ta base de données?
Cela va multiplier tes controls dans ton usf si 2 combo= 1 textbox!!!!
Du genre
Sheets("Feuil1").Range("A1:A" & Range("A65536").End(xlup).Row).value= Cb1.value &" "&Cb2.value
Pour ta deuxième question, Tout dépend ou l'on doit chercher les données, même lignes, même colonnes, etc... Dans ces cas c'est faisable!

 

Vote positif 0 Vote négatif

O

onyx41

Guest

• 13 Janvier 2009

• #8

Re : 2 combo dans une textbox x 37

Je te joint le fichier que j'aimerais faire pour une collègue qui sera peut-être plus explicite.
les combos me mettaient à l'abri de mauvaises saisies en évitant les bugs du cdate avec qui je me bat régulièrement pour comprendre les erreurs lorsqu'il y a une mauvaise saisie.

 

Pièces jointes

• USF4-2.xls

  165 KB · Affichages: 71

Vote positif 0 Vote négatif

O

onyx41

Guest

• 14 Janvier 2009

• #9

Re : 2 combo dans une textbox x 37

Re,

Alex, j'ai opté avec avis de ma collègue pour les combos, donc, pas de souci, j'ai pu le faire et ça fonctionne nickel ( même si ça pèse un peu le fichier ).

Par contre, j'ai 2 soucis où j'aimerais encore avoir votre aide.

1) Lorsque je saisies un nouveau médaillé, j'aimerais être averti lorsque celui-ci a un doublon, mais avec le choix de continuer la saisie ou pas en affichant le ou les doublons existants.

2) Dans la visualisation, si certains ne veulent pas les doublons, moi, c'est le contraire, soit les afficher tout simplement dans la combo, soit un bouton pour passer au suivant...

Cela est-il possible ???? Je n'en doute pas avec les as de ce forum...

 

Vote positif 0 Vote négatif

A

alex67800

XLDnaute Impliqué

• 14 Janvier 2009

• #10

Re : 2 combo dans une textbox x 37

Bonjour onyx41,
Pour les soucis de format date, le plus simple est d'utiliser un dtpicker, à la place d'un textbox!
Pour tes la gestion des doublons, regarde le fil suivant:
https://www.excel-downloads.com/threads/controles-doublons.110642/

Je t'avoue que je ne m'en suis jamais servit personnellemnt.



Edit: en fait remplacer tout tes textDate par des dtpicker et le tour est joué! Ou tout du moins tes combo par des dtpicker. A toi de voir!

 

Dernière édition: 14 Janvier 2009

Vote positif 0 Vote négatif

A

alex67800

XLDnaute Impliqué

• 15 Janvier 2009

• #11

Re : 2 combo dans une textbox x 37

Re,
Sinon j'ai repensé à ton problème. Tu peu demander aux utilisateurs de taper la date sans séparateur (ex: 14012009) puis tu met ce code:

Code:

Private Sub TextBox1_AfterUpdate()
If TextBox1.Value <> "" Then TextBox1.Value = Format(TextBox1.Value, "##/##/####")

puis dans ton btvalidemodif
Sheets("source").Range("D1").Value = Private Sub TextBox1_AfterUpdate()
If TextBox1.Value <> "" Then TextBox1.Value = Format(TextBox1.Value, "##/##/####")

End Sub

Puis à mettre dans ton btValidModif
Sheets("source").Range("D1").Value = Format(TextBox1.Value, "dd mmm yyyy") 'donne donc 14 janv 2009

Code à adapter avec tes c.offset.value= Format(TextBox1.Value, "dd mmm yyyy")

Ce qui fera que dès que change de control le format passera automatiquement au format 14/01/2009.
A adapter à tes cellules

 

Vote positif 0 Vote négatif

O

onyx41

Guest

• 21 Janvier 2009

• #12

Doublons 2 colonnes, voir 3

Re Alex,

désolé pour le temps passé, mais j'ai profité de quelques jours de relache sans ordi.

Pour le fichier, j'ai opté pour des combo, plus lourd c'est clair, mais pratique pour ma collègue.

Par contre, pour les doublons, j'ai beau essayé, je n'y arrive pas et en plus, je suis sur excel 97 au taf qui n'arrange pas les choses, ce que je trouve bug..ggrrr

En fait, si quelqu'un peut me venir en aide, j'en serais vraiment ravi. Ce que j'aimerais, c'est gérer les doublons, et non les supprimer. Je vais essayer de m'expliquer :

Dans la combo " Nom ", que ça m'affiche comme c'est fait une seule fois le nom ( même si il y est plusieurs fois ) par contre, si deux personnes portent le même nom ( mais pas le même prénom ), que je puisse être averti ( sois par un msg, soit un bouton à cliquer pour passer au suivant )et que j'ai le choix ensuite dans la combo " prénom" de choisir celui que je désire, éventuellement ensuite, voir pour un dernier cas, si par malheur 2 personnes portent le même nom et prénom, le choix sur la date de naissance.

Pas simple pour un débutant comme moi

Merci à ceux qui voudront bien prendre du temps pour mon projet.

 

Vote positif 0 Vote négatif

O

onyx41

Guest

• 21 Janvier 2009

• #13

Re : 2 combo dans une textbox x 37

J'ai oublié le fichier..oups...

 

Pièces jointes

• Doublons.xls

  216.5 KB · Affichages: 81
• Doublons.xls

  216.5 KB · Affichages: 83
• Doublons.xls

  216.5 KB · Affichages: 88

Vote positif 0 Vote négatif

A

alex67800

XLDnaute Impliqué

• 22 Janvier 2009

• #14

Re : 2 combo dans une textbox x 37

Bonjour onyx41,

Je ne maitrise malheureusement pas les doublons désolé.
Par contre tu peu utiliser une autre solution qui serait d'activer ton USF avec double click sur la cellule nom par exemple. De là afficher automatiquement le reste de tes controls avec les cellules adjacente de la même ligne.

https://www.excel-downloads.com/threads/activation-userform-et-renseignement-de-celui-ci.110369/

https://www.excel-downloads.com/threads/userform-et-selection-manuel-de-cellules.110101/

Sinon crée un nouveau post pour les doublons!

 

Vote positif 0 Vote négatif

O

onyx41

Guest

• 22 Janvier 2009

• #15

Re : 2 combo dans une textbox x 37

Encore merci pour ton aide Alex, j'ai relancé un autre fil.

A bientôt.

 

Vote positif 0 Vote négatif