valeur de varaible tableau dans Combobox (Résolu)

  • Initiateur de la discussion Initiateur de la discussion Laguich
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

Laguich

XLDnaute Junior
Bonjour à tous,
Pierrejean m'a bien dépanné sur une macro, mais j'ai un autre souci, mon fichier étant en partagé, je ne peux créer de liste de choix donc il faut passer en combobox et userform. Ca c pret, seulement je ne sais pas comment sortir les references trouver dans la macro.
Voici le code:
Code:
  For n = LBound(tablo, 1) To UBound(tablo, 1)
  If tablo(n, 2) = Target.Value Then
   liste = liste & tablo(n, 3) & ","
  End If
  Next
  
  Set lookfor = book1.Sheets(nombase).Range("B" & Target.Row)   ' value to find
 
  If IsEmpty(liste) Then
  Target.Offset(0, 1).Value = "DSL - Peut être erreur de frappe"
  Exit Sub
  Else
 
liste = Left(liste, Len(liste) - 1)
End If
 If InStr(liste, ",") <> 0 Then
  With Target.Offset(0, 1).Validation
   .Delete
   .Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, Operator:= _
    xlBetween, Formula1:=liste
  End With
  Target.Offset(0, 1).Select
 Else
  With Target.Offset(0, 1).Validation
   .Delete
  End With
Si je Met :
Code:
combox1.additem liste
dans ma combobox s'affiche le resultat sur une seule ligne avec une virgule en separateur et pas le choix des 2 entrées.
Espérant être compris.
Merci ,d'avance
 
Dernière édition:
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

  • Question Question
Microsoft 365 worksheet_change
Réponses
29
Affichages
484
Réponses
4
Affichages
180
Réponses
7
Affichages
165
Retour