nom comboBox dynamique

nom comboBox dynamique - VB/VBA/VBS - Programmation

Marsh Posté le 10-04-2005 à 20:59:38    

Bonjour,  
 
qq un sait il comment adresser une comboBox en fonction de la valeur d un parametre?
De concatener 2 variables pour optenir le nom de la combo
 
genre text = MaCombo & MaValeur.Value
ou alors peut on parcourir la liste des controls avec un truc du style sheets.controls(MaCombo & MaValeur)
 
si MaValeur vaut 2, MaCombo vaut "ListeCourse" et que la combo ListeCourse2 existe je recupere la valeur
 
merci
 

Reply

Marsh Posté le 10-04-2005 à 20:59:38   

Reply

Marsh Posté le 12-04-2005 à 17:39:30    

Juste un bête code de test:

Sub Test()
 
  Dim iValeur As Integer
  Dim sTexte As String
  Dim vI As Variant
   
  sTexte = "ComboBox"
  iValeur = Trim(InputBox("Un chiffre" ))
   
  For Each vI In UserForm1.Controls
    If vI.Name = sTexte & CStr(iValeur) Then
      vI.SetFocus
      UserForm1.Show
      Exit For
    End If
  Next vI
   
End Sub


J'ai testé, ça marche!


---------------
Si on vous donne une info qui marche, DITES-LE!!!! ------ Si vous trouvez seul, AUSSI, votre solution peut servir à d'autres! ------ Je dois la majorité de mes connaissances à mes erreurs!
Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed