Rechercher par ComboBox, afficher sur TexBox

Paritec

XLDnaute Barbatruc

• 29 Mai 2013

• #2

Re : Rechercher par ComboBox, afficher sur TexBox

Bonsoir
ton fichier en retour
a+
papou🙂

 

Pièces jointes

• Ilino V1.xlsm

  188.4 KB · Affichages: 45

Vote positif 0 Vote négatif

Ilino

XLDnaute Barbatruc

• 29 Mai 2013

• #3

Re : Rechercher par ComboBox, afficher sur TexBox

Bonsoir PAPOU
grazie pour la réponse , c'est exactement ce que je cherchais, mais si vous permettez , pourquoi la liste dans le comboBox ( nommé C1) est limitée ??
A+
NB : si je rajoute un nouveau contrat dans la liste le ComboBox ne prend pas en charge jusqu’à la fermeture du fichier ?!

 

Dernière édition: 29 Mai 2013

Vote positif 0 Vote négatif

Ilino

XLDnaute Barbatruc

• 29 Mai 2013

• #4

Re : Rechercher par ComboBox, afficher sur TexBox

Re PAPOU
Sorry lors de l'adaptation de ton code a mon programme j'ai rencontrer un bug 😡
a ce niveau

Code:

Feuil1.TextBox25 = Feuil1.C1.List(Feuil1.C1.ListIndex, 2)

Erreur d'execution 2147024809 ... Etc
Impossible de lire la propriété List. Argument non valide
Merci

 

Vote positif 0 Vote négatif

Ilino

XLDnaute Barbatruc

• 29 Mai 2013

• #5

Re : Rechercher par ComboBox, afficher sur TexBox

Re FORUM
Puis je avoir votre AIde? , Pourquoi cette erreur? est ce que due a la version 2003 ou 2007 ?
Grazie

 

Vote positif 0 Vote négatif

Ilino

XLDnaute Barbatruc

• 29 Mai 2013

• #6

Re : Rechercher par ComboBox, afficher sur TexBox

Bonsoir FORUM
un coud de pousse please
A+

 

Vote positif 0 Vote négatif

Paritec

XLDnaute Barbatruc

• 30 Mai 2013

• #7

Re : Rechercher par ComboBox, afficher sur TexBox

Bonjour Ilino le forum
bon alors tu renvoies ton fichier et tu précises quelle version tu utilises et je regarderai
pour la longueur de la liste elle se charge automatiquement à l'ouverture du fichier et la liste correspond à la liste complète, c'est sur.
Par contre si tu modifies la liste là c'est pas pris en compte, mais si tu expliquais comment tu veux te servir du fichier ce serait plus simple
Ma réponse était pour répondre à ta demande dans ,le poste 1
a+
papou🙂

 

Vote positif 0 Vote négatif

Paritec

XLDnaute Barbatruc

• 30 Mai 2013

• #8

Re : Rechercher par ComboBox, afficher sur TexBox

Re ilino le forum
ton fichier en retour avec une liste qui s'actualise si tu actives la feuille département étude
a+
Papou🙂

 

Pièces jointes

• Ilino V2.xlsm

  189.5 KB · Affichages: 43
• Ilino V2.xlsm

  189.5 KB · Affichages: 47
• Ilino V2.xlsm

  189.5 KB · Affichages: 40

Vote positif 0 Vote négatif

job75

XLDnaute Barbatruc

• 30 Mai 2013

• #9

Re : Rechercher par ComboBox, afficher sur TexBox

Bonjour Ilino, salut Paritec,

Voir le fichier joint :

- la plage contrats est rendue dynamique

- la propriété ListFillRange de la ComboBox ne doit pas être utilisée

- le code de la feuille :

Code:

Private Sub ComboBox1_GotFocus()
ComboBox1.List = [contrats].Value
End Sub

Private Sub ComboBox1_Change()
If ComboBox1.ListIndex = -1 Then TextBox25 = "" Else _
  TextBox25 = [contrats].Cells(ComboBox1.ListIndex + 1, 3)
End Sub

A+

 

Pièces jointes

• RECHERCHER via COMBOBX(1).xlsm

  189.4 KB · Affichages: 39

Vote positif 0 Vote négatif

job75

XLDnaute Barbatruc

• 30 Mai 2013

• #10

Re : Rechercher par ComboBox, afficher sur TexBox

Re,

Il faut au moins 2 éléments pour définir la propriété .List.

Par sécurité je définis donc contrats par :

Code:

=DECALER(LISTES!$C$1;1;;MAX(NBVAL(LISTES!$C:$C)-1;2))

Dans la feuille "LISTES" effacer la plage C2:E34 pour voir.

Fichier (2).

A+

 

Pièces jointes

• RECHERCHER via COMBOBX(2).xlsm

  188.4 KB · Affichages: 40

Vote positif 0 Vote négatif

Ilino

XLDnaute Barbatruc

• 30 Mai 2013

• #11

Re : Rechercher par ComboBox, afficher sur TexBox

Bonjour PAPOU

Paritec à dit:

Bonjour Ilino le forum
.....tu précises quelle version tu utilises et je regarderai ...

Cliquez pour agrandir...

Je travaille sur la version 2007

Paritec à dit:

Bonjour Ilino le forum
... elle se charge automatiquement à l'ouverture du fichier et la liste correspond à la liste complète,...

Cliquez pour agrandir...

pour ce point je confirme merci

Paritec à dit:

Bonjour Ilino le forum
Par contre si tu modifies la liste là c'est pas pris en compte, mais si tu expliquais comment tu veux te servir du fichier ce serait plus simple

Cliquez pour agrandir...

merci encore j'avais un pblm lors d'execution,ça bug comme je l'ai indiqué au post#4, mais pour ta reponse au post #1
elle est correcte
A+

 

Vote positif 0 Vote négatif

Ilino

XLDnaute Barbatruc

• 30 Mai 2013

• #12

Re : Rechercher par ComboBox, afficher sur TexBox

Re
merci PAPOU,merci MAITRE
Mnt ça commence a bouger mon programme...je vais les tester
A+

 

Vote positif 0 Vote négatif

Ilino

XLDnaute Barbatruc

• 30 Mai 2013

• #13

Re : Rechercher par ComboBox, afficher sur TexBox

Re
mon souci est resolu GRAZIE pour tout le monde
Si vous permettez et afin d’améliorer mon code ( après de recherche dans les deux forum EXCEL) j’ai trouvé des codes pour renommer les onglets dans le meme classeur mais dans mon cas je souhaiterai
1. créer un nouveau classeur (avec l’ensemble des feuilles existantes dans le premier MODEL) ainsi leurs codes
2. et renommer ce nouveau classeur par le nom sélectionné dans le comboBox1
GRAZIE

 

Vote positif 0 Vote négatif

Paritec

XLDnaute Barbatruc

• 30 Mai 2013

• #14

Re : Rechercher par ComboBox, afficher sur TexBox

Bonjour Ilino le forum
pas bien compris ce que tu veux faire?
tu veux simplement copier le classeur actif et le renommer du nom contenu en Combobox1 c'est bien cela?
si oui après réponse je te ferai la macro
a+
papou🙂

 

Vote positif 0 Vote négatif

Ilino

XLDnaute Barbatruc

• 30 Mai 2013

• #15

Re : Rechercher par ComboBox, afficher sur TexBox

Bonjour PAPOU
oui c'est exactement ce que je souhaiterai
merci par avance

 

Vote positif 0 Vote négatif