Thema Datum  Von Nutzer Rating
Antwort
16.11.2013 15:27:05 Artecnet
Solved
16.11.2013 22:16:41 Neuhäusler Korbinian
NotSolved
Rot Combobox mit Filter
 18.11.2013 08:53:43 Gast177
NotSolved

Ansicht des Beitrags:
Von:
Gast177		 Datum:
18.11.2013 08:53:43		 Views:
736		 Rating:
     
Antwort:
  Ja
Thema:
Combobox mit Filter

Für alle die es interessiert. Ich habe jetzt folgende Lösung.

 

Dim X as Long, Arr as Variant

With ActiveSheet
    Arr = .Range(.Cells(1,1), .Cells(.Cells(1, 1).End(xlDown).Row, 3)).Value
End With

For X = LBound(Arr) To UBound(Arr)
    Select Case Arr(X, 3)
        Case "Produkt 1": ComboBox1.AddItem CStr(Arr(X, 1))
        Case "Produkt 2": ComboBox2.AddItem CStr(Arr(X, 1))
        '.
        '.
        '... undsoweiterundsofort^^

    End Select
Next

 

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
16.11.2013 15:27:05 Artecnet
Solved
16.11.2013 22:16:41 Neuhäusler Korbinian
NotSolved
Rot Combobox mit Filter
 18.11.2013 08:53:43 Gast177
NotSolved