Live-Forum - Die aktuellen Beiträge
Datum
Titel
24.04.2024 19:29:30
24.04.2024 18:49:56
Anzeige
Archiv - Navigation
744to748
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
744to748
744to748
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

auswahl in combobox

auswahl in combobox
17.03.2006 14:52:24
F
Hallo,
ich habe eine Userform mit drei ComboBoxen.
Der Code beim öffnen der Userform ist folgender:

Private Sub UserForm_Activate()
ende = Cells(Rows.Count, 1).End(xlUp).Row
UserForm1.ComboBox1.RowSource = "A4:A" & ende
UserForm1.ComboBox2.RowSource = "B4:B" & ende
UserForm1.ComboBox3.RowSource = "C4:C" & ende
End Sub

Das klappt auch wunderbar.
Nun sind in den Reihen A,B und C aber Einträge
die mehrmals vorkommen.
Ist es möglich, das die mehrmals vorkommenden Einträge
in der Auswahl der ComboBox nur einmal erscheinen?
Was natürlich am allerbesten währe, wenn in der Auswahl
der ComboBox2 nur noch die Werte angezeigt werden die
neben den Zellen stehen die in der ComboBox1 angewählt sind,
und in ComboBox3 nur noch die Werte die neben den Zellen der
in Combobox1 und 2 angewählen Werte stehen.
Geht das? Wenn ja, dann wie?
Mit freundlichen Grüssen Frank

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: auswahl in combobox
17.03.2006 16:56:17
Xelleron(Dennis)
Hallo Frank,

Private Sub UserForm_Initialize()
Dim i As Integer
Sheets("Tabelle9").Range("A1:A9").Sort Key1:=Range("A1"), Order1:=xlAscending, Header:= _
xlGuess, OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal
With UserForm17.ComboBox1
For i = 1 To Worksheets("Tabelle9").UsedRange.Rows.Count
If Worksheets("Tabelle9").Cells(i, 1).Value <> _
Worksheets("Tabelle9").Cells(i + 1, 1).Value Then _
.AddItem Cells(i, 1).Value
Next i
End With
End Sub

Must Du natürlich anpassen.
Gruss Dennis
AW: auswahl in combobox
17.03.2006 19:21:43
F
Hallo Dennis,
vielen Dank für deine Hilfe.
Ich kann das erst am Montag ausprobieren.
Bin schon im Wochenende.
Mit freundlichen Grüssen
Frank
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige