Valeur mise automatiquement dans une userform

Raphou96

XLDnaute Nouveau
Salut


J'ia un petit soucis et j'arrive pas à trouver la bonne solution

J'ai un tableau de valeur

J'ai une userform

Je selectionne grace à un menu déroulant une valeur qui correspond à la colonne A de mon tableau et dans les textbox je veux les remplir automatiquement à chaque changement du menu déroulant avec les colonnes B et C de mon tableau.

Une info je ne sais pas si elle a son importance, mon tableau originale aura 5000 lignes.


Je vous place un fichier exemple


Merci
 

Raphou96

XLDnaute Nouveau
Mais heu !!!!
J'ai oublié mon fichier

[file name=Choix.zip size=6370]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/Choix.zip[/file]
 

Pièces jointes

  • Choix.zip
    6.2 KB · Affichages: 10
  • Choix.zip
    6.2 KB · Affichages: 14
  • Choix.zip
    6.2 KB · Affichages: 23

mutzik

XLDnaute Barbatruc
Bonjour Raphou96

Voir la réponse dans le fichier joint. Pour info, dans le choix d'une liste, le premier élément = listindex(0) d'ou le +2 dans mon code [file name=Choix_20050914081655.zip size=9846]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/Choix_20050914081655.zip[/file]
 

Pièces jointes

  • Choix_20050914081655.zip
    9.6 KB · Affichages: 25

_Thierry

XLDnaute Barbatruc
Bonjour Raphou, Mutzik, le Forum

Une autre approche par Array, qui sera plus rapide que de travailler en ListIndex sur les range en RowSource sur un grand Tableau.

Option Explicit

Private TabData As Variant

Private Sub UserForm_Initialize()
   
With Sheets('Feuil1')
        TabData = .Range(.Range('A2'), .Range('C65536').End(xlUp))
   
End With
   
   
With Me.CB_01
        .List() = TabData
        .MatchRequired =
True
   
End With
End Sub

Private Sub CB_01_Change()
   
With Me.CB_01
        Me.TB_01 = TabData(.ListIndex + 1, 2)
        Me.TB_02 = TabData(.ListIndex + 1, 3)
   
End With
End Sub

Bonne Journée
[ol]@+Thierry[/ol]
 

Discussions similaires

Réponses
3
Affichages
1 K

Statistiques des forums

Discussions
300 793
Messages
1 987 236
Membres
209 747
dernier inscrit
chx974