Live-Forum - Die aktuellen Beiträge
Datum
Titel
19.04.2024 12:23:24
Wenn-Formel anpassen
19.04.2024 12:09:19
Unique (Application.WorksheetFunction.Unique)
19.04.2024 11:51:37
Nächsten identischen Treffer suchen
19.04.2024 11:45:34
Feld im SAP auslesen
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1636to1640
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
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1636to1640
1636to1640
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

abhängige Comboboxen, "" ignorieren

abhängige Comboboxen, "" ignorieren
13.08.2018 14:34:57
Chris
Guten Tag,
ich habe 2 voneinander abhängige Comboboxen, welcher aber leider mit überflüssigen Leerzellen gefüllt werden.
Ich habe schon probiert irgendwie
"If .....Value "" Then"
Und "If Not IsEmpty" einzubauen, aber ich scheitere daran.
Beispieldatei:
https://www.herber.de/bbs/user/123307.xlsm
Danke im Voraus für eure mögliche Hilfe!
Gruß,
Chris

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: abhängige Comboboxen, "" ignorieren
13.08.2018 14:52:38
{Boris}
Hi Chris,
wenn es nicht tausende von Einträgen sind:
Option Explicit
Private Sub ComboBox_Site_Click()
Dim C As Range, iCol As Integer
iCol = ComboBox_Site.ListIndex + 1
Me.ComboBox_LS.Clear
For Each C In Range(Cells(2, iCol), Cells(20, iCol)) 'Die 20 steht für: bis Zeile 20 - bei  _
Bedarf ausreichend erweitern
If C  "" Then
Me.ComboBox_LS.AddItem Sheets(2).Cells(C.Row, iCol)
End If
Next C
End Sub
VG, Boris
AW: abhängige Comboboxen, "" ignorieren
13.08.2018 15:08:40
Chris
Hallo Boris,
SUPER - danke Dir, das ging echt schnell!!!!
Das funktioniert wunderbar, nur ein Problemchen habe ich...
Mein Userform öffne ich in Sheet3 und nicht wie im Beispiel in Sheet2 (Tab1).
Der Codeteil bzgl. " """ bezieht sich irgendwie immer auf die Tabelle die gerade aktiv ist, wie kann ich das noch anpassen?
Gruß,
Chris
Anzeige
AW: abhängige Comboboxen, "" ignorieren
13.08.2018 15:34:01
EtoPHG
Hallo Chris,
Was macht das für einen Sinn, die Quelldaten nochmals in Tab1 aufzuführen?
Warum nicht gleich so: 
Option Explicit
Private Sub ComboBox_Site_Click()
Dim i As Long
ComboBox_LS.Clear
With Worksheets("Quelle")
For i = 2 To .Cells(.Rows.Count, ComboBox_Site.ListIndex + 1).End(xlUp).Row
ComboBox_LS.AddItem .Cells(i, ComboBox_Site.ListIndex + 1)
Next
End With
End Sub
Private Sub UserForm_Initialize()
Dim i As Long
With Worksheets("Quelle")
For i = 1 To WorksheetFunction.CountA(.Rows(1))
ComboBox_Site.AddItem .Cells(1, i)
Next
ComboBox_Site.ListIndex = 0
End With
End Sub
Gruess Hansueli
Anzeige
AW: abhängige Comboboxen, "" ignorieren
13.08.2018 16:44:18
Chris
Hallo Hansueli,
danke für deinen Post.
Die Daten werden vorher gefiltert und geordnet, daher habe ich als Bezug "Tab1" angegeben - damit es an die tatsächliche Situation ran kommt.
Deine Codes funktionieren daher nicht, denn bei mir liegen in der Ausgangssituation keine manuellen Eingaben vor.
Gruß,
Chris
AW: abhängige Comboboxen, "" ignorieren
13.08.2018 17:07:10
{Boris}
Hi,
dann musst Du das Blatt explizit mit referenzieren: 
Private Sub ComboBox_Site_Click()
Dim C As Range, iCol As Integer
iCol = ComboBox_Site.ListIndex + 1
Me.ComboBox_LS.Clear
With Worksheets("Tab1")
For Each C In .Range(.Cells(2, iCol), .Cells(20, iCol))
If C  "" Then
Me.ComboBox_LS.AddItem .Cells(C.Row, iCol)
End If
Next C
End With
End Sub
VG, Boris
Anzeige
AW: abhängige Comboboxen, "" ignorieren
13.08.2018 17:20:38
Chris
Hi Boris,
jetzt ist es perfekt! Danke nochmals!
Gruß,
Chris

299 Forumthreads zu ähnlichen Themen

Alle Inhalte in Comboboxen löschen
Frank

Hallo!
Ich habe mehrere Comboboxen in ein Sheet eingebaut. Leider bleibt darin immer die letzte Auswahl stehen. In meiner Userform konnte ich mit "Claer all" alle Eingaben entfernen. gibt es einen solchen Befehl auch für die Comboboxen im Sheet?
Gruß Frank
15.08.2008 11:24:32
Thread-ID: 1002119
2 Beiträge
Anzeige
Spez. Dropdown-Zuordnungen in Comboboxen
Lenhard

Moin Moin Excellianer!!
Alle Ausführungen habe ich auch direkt in meine Beispieldatei reingeschrieben.
Aber hier auch noch mal:
Im Dropdown der ComboBox1 sollen als Liste die Einträge der Zeile 1 von links nach rechts aus der Tabelle1 erscheinen (Kategorie A, Kategorie B, Kategorie...
09.12.2008 11:24:55
Thread-ID: 1031295
5 Beiträge
Comboboxen Spalten Anzahl
gp

Hallo Zusammen,
ist die Anzahl der Spalten von ComboBoxen begrenzt?
Für zweckdienliche Hinweise herzlichen Dank.
Gruss
Gunter
26.01.2009 11:08:00
Thread-ID: 1043791
5 Beiträge
Anzeige
zwei comboboxen auslesen
Dee

Hi Ihr,
Ich habe zwei Kategorien mit ComboBoxen (Deutschland, Amerika), welche bei unregelmäßige Nummer tragen
Deutschland (ComboBox 2/6/7/10/13)
Amerika (ComboBox 5/8/9/11/12)
Beide können jeweils mit yes und no belegt sein. Ich möchte mir jetzt die einzelnen Fälle in einem Te...
22.04.2009 19:14:52
Thread-ID: 1070463
8 Beiträge
Comboboxen Kuriositäten
Volti

Hallo zusammen,
habe schwere Probleme mit den Comboboxen aus der Toolbox, die wie mir scheint, nach jedem Update immer schlimmer werden.
1. Resizingprobleme: Es kommt verstärkt vor, dass der angezeigte Inhalt im Auswahlfeld nach Verlassen der Seite (z.B. kurzzeitig anderes Programm wie...
02.06.2009 10:45:10
Thread-ID: 1078566
3 Beiträge
Comboboxen formatieren
Ludicla

Hey Profis,
wie müßte ein Code aussehen der mehrere Comboboxen formatiert?
ich hab an die 100 Stück - sicher es geht auch einzelen
ich schaff keinen einfachen Code und mach alles einzeln.
Gruss Ludicla.
04.06.2009 14:58:16
Thread-ID: 1079162
7 Beiträge
Comboboxen für abhängige Auswahlen?
Claudia

Liebes Forum,
ich habe eine Tabelle mit drei Spalten. Die darin enthaltenen Infos werden von Spalte 1 zu 3 immer feiner. Z.B. steht in Spalte 1 "Wilde Tiere" und "Zahme Tiere". In Spalte 2 dann die jeweils zugehörigen Einträge "Tiger" (natürlich Wilde Tiere) und "Hase" (Zahme Tiere). Und in...
19.06.2009 09:53:10
Thread-ID: 1082797
6 Beiträge
ComboBoxen deaktivieren
Micha

Hallo zusammen,
ich habe folgende Herausforderung:
Teil 1:
In einem Tabellenblatt (Tabelle1) habe ich mehrere Comboboxen.
Wenn in der ComboBox_1 der Eintrag „ Name?“ gewählt wurde, müssen die …
ComboBox_2
ComboBox_3
ComboBox_4 … deaktiviert werden. Bei allen anderen...
19.06.2009 10:20:18
Thread-ID: 1082808
7 Beiträge
Anzeige

Links zu Excel-Dialogen

ComboBox UserForm

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
1
1
4
4
16
7
2
6
5
6
18
2
13
13
4
6
2
6
1
4
6
14
1
4
3