Live-Forum - Die aktuellen Beiträge
Datum
Titel
04.10.2025 18:18:42
Anzahl in einer Zelle automatisch ermitteln
04.10.2025 17:44:54
Power Query - Filtern einer Spalte mittels einer Liste
04.10.2025 15:35:03
Range um eine Einzelzelle erweiternerweitern
04.10.2025 14:27:49
Was ist mit dem CEF Forum passiert?
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
804to808
804to808
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

ComboBox Inhalt - leere Zellen ignorieren

Forumthread: ComboBox Inhalt - leere Zellen ignorieren

ComboBox Inhalt - leere Zellen ignorieren
26.09.2006 22:01:07
Martin
Hallo und Guten Abend liebe Excel-eratoren!
Ja, er schon wieder! In meiner UF habe ich ein ComboBox die von der Tabelle "Eingaben" gefüllt wird. Der Code sieht so aus:

Private Sub UserForm_Initialize()
With ComboBox1
.AddItem Sheets("Eingaben").Range("D1")
.AddItem Sheets("Eingaben").Range("D2")
.AddItem Sheets("Eingaben").Range("D3")
.AddItem Sheets("Eingaben").Range("D4")
.AddItem Sheets("Eingaben").Range("D5")
.AddItem Sheets("Eingaben").Range("D6")
.AddItem Sheets("Eingaben").Range("D7")
.AddItem Sheets("Eingaben").Range("D8")
.AddItem Sheets("Eingaben").Range("D9")
.AddItem Sheets("Eingaben").Range("D10")
.AddItem Sheets("Eingaben").Range("D11")
.AddItem Sheets("Eingaben").Range("D12")
.AddItem Sheets("Eingaben").Range("D13")
.AddItem Sheets("Eingaben").Range("D14")
.AddItem Sheets("Eingaben").Range("D15")
.AddItem Sheets("Eingaben").Range("D16")
.AddItem Sheets("Eingaben").Range("D17")
End With
End Sub

Funktioniert auch so weit OK, nur die leeren Zellen (wo noch kein Eintrag vorhanden ist), werden auch angezeigt. Lässt sich dieses irgendwie unterbinden. Es sollen also nur die Zellen angezeigt werden wo was drin steht. Habe leider auch nichts passendes im Archiv gefunden.
Einen schönen Abend noch und
Grüße aus dem verregneten Knast in Celle!
Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: ComboBox Inhalt - leere Zellen ignorieren
26.09.2006 22:06:39
Konni
Option Explicit

Private Sub UserForm_Initialize()
Dim i As Long
With ComboBox1
For i = 1 To 17
If Not IsEmpty(Sheets("Eingaben").Cells(i, 4)) Then
.AddItem Sheets("Eingaben").Cells(i, 4)
End If
Next
End With
End Sub

mfg Konni
AW: ComboBox Inhalt - leere Zellen ignorieren
26.09.2006 22:13:56
Martin
Hallo Konni,
ich bin schwer begeistert. Das klappt auf Anhieb. Gibt es eine Möglichkeit die Eingaben aus dem genannten Bereich alphabetisch zu sortieren? Wäre ja auch schön....
Gruß
Martin
Anzeige
AW: ComboBox Inhalt - leere Zellen ignorieren
26.09.2006 23:05:24
chris
Hallo Martin was hälst du davon ? 

Private Sub UserForm_Initialize()
Dim i As Long
Worksheets("Eingaben").Range("D1:D17").Sort Key1:=Range("D1"), Order1:=xlAscending, Header:=xlGuess, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, DataOption1:=xlSortNormal
With ComboBox1
For i = 1 To 17
If Not IsEmpty(Sheets("Eingaben").Cells(i, 4)) Then
.AddItem Sheets("Eingaben").Cells(i, 4)
End If
Next
End With
End Sub

Anzeige
;

Forumthreads zu verwandten Themen

Leere Zellen ignorieren
Stef

Hallo zusammen
ich habe unter dem Tabellenblatt Namens "Personal!"
eine Personalliste welche Pro Zeile eine Person und deren Eigenschaften steht
Nun Filtere ich mit der unten stehenden Formel gewisse Personen in "Tabelle1"
Tabelle1
A33=WENN(Personal!L3>0;Personal!C3;0)~...
10.10.2011 14:57:28
Thread-ID: 1233193
8 Beiträge
Makro Anpassung: leere Zellen nicht ignorieren
Robert74

Hallo liebe Community,
ich hab vor einiger Zeit schon einmal in diesem Forum gepostet und mir wurde auch super geholfen bei meinem Problem. Ich war sehr erstaunt wie nett und hilfsbereit die leute waren und dachte mir, ich Versuch es nocheinmal mein Problem zu schildern.
Ich habe ein be...
19.04.2012 13:32:50
Thread-ID: 1260056
3 Beiträge
dropdown mit leerenZellen
stef26

Hallo Zusammen,
ich muss gestehen ich bin vermutlich doof.
Ich hab zu meinem Problem viele Beiträge gefunden und kann es trotzdem nicht umsetzen.
Ich möchte ein Dropdown ohne leere Zellen aufbauen.
Ich habs mal in einem sehr vereinfachten Beispiel mal dargestellt.
https://ww...
13.03.2015 23:50:07
Thread-ID: 1414966
8 Beiträge
Anzeige
Spalte m. Faktor multipl., leere Zellen ignorieren
Katinka
Hallo ihr lieben Excel-Könner,
leider habe ich bisher nicht die Lösung für mein Problem gefunden, deshalb hier die Frage.
Um die bedingte Formatierung anzuwenden, müssen etliche Zahlen einer Tabelle, die aus einer .txt-Datei kommen, erst noch mit 1 multipliziert werden. Das soll folgender C...
19.04.2015 14:17:15
Thread-ID: 1421691
9 Beiträge
Dropdownliste aus anderem Reiter mit leeren Zellen
assel90

Hallo zusammen!
Ich möchte per VBA eine Dropdownliste erstellen, da die normale "Länge" die Excel anbietet für die Anzahl an Auswahlmöglichkeiten nicht ausreicht.
Mein Vorhaben sieht wie folgt aus: Ich möchte im ersten Tabellenblatt eine Dropdownliste erzeugen, die ihre Werte aus einer...
15.05.2015 12:00:58
Thread-ID: 1426341
21 Beiträge
Anzahl ohne Duplikate, leere Zellen ignorieren
Bonduca01

Hallo,
Der Code unten gibt mir in Tabelle 1 Zelle (3,8) die Anzahl der Zellen ohne Duplikate aus.
Leider zählt der Code auch die leeren Zellen mit.
Gibt es eine Möglichkeit, dass er die leeren Zellen nicht zählt? Sub TT() Worksheets("Tabelle1").Activate Cells(3, 8) = Anzahl End Su...
14.07.2015 10:39:10
Thread-ID: 1436244
4 Beiträge
Zeile : Einträge listen ohne leere Zellen
udo

Hallo Forum-Experten,
ich bräuchte bitte eure Hilfe bei folgendem Fall:
Zeilenbereich AY60:QE60
dort stehen in versch. Zellen einzelne Buchstaben,
dazwischen unterschiedlich leere Zellen.
Ich suche eine Formel die mir dann in AY55 rechts-wärts kopierend bis QE55
alle E...
16.10.2015 12:01:21
Thread-ID: 1452634
9 Beiträge
Leere Zellen ignorieren
Markus

Liebes Forum,
wie müsste ich folgenden Code anpassen, damit bei einer leeren Zelle, diese auch leer bleibt und sich nur dann ein Hyperlinkpfad einfügt, sobald die Zelle einen Inhalt zum jeweiligen Zielordner besitzt?
Sub Hyperlink() Dim Zelle As Range Dim rngSpalte As Range Set rngSpalt...
11.06.2016 12:02:17
Thread-ID: 1498304
5 Beiträge
Inhalt der List und leere Zellen ignorieren
Ben

hallo gibt es einen Befehl in meinem Code der leere Zellen in der liste ignoriert?
So das ich eine untereinander gereite liste habe?
Private Sub ListBox1_DblClick(ByVal Cancel As MSForms.ReturnBoolean) Dim i As Integer Dim strAuswahl As String For i = 0 To ListBox1.ListIndex If ListBox1...
17.08.2016 14:05:01
Thread-ID: 1509780
17 Beiträge
Anzeige
Dropdown - leere Zellen löschen
Vossi

Hallo!
Ich habe ein DropDown Feld, dass sich auf eine Range bezieht in der jede Zelle mit einer wenn dann Formel gefüllt wird. Das Ergebniss ist dann entweder eine leere Zell oder ein Text.
Ich will nun das in meinem Dropdown Feld nur die Zellen mit Text angezeigt werden und nicht die, di...
24.09.2002 10:56:11
Thread-ID: 163062
4 Beiträge
Leere Zellen ignorieren
alex_de_souza

Hallo,
ich habe folgenden Code, der auch wunderbar funktioniert hat: Private Sub Workbook_Open() Dim rngZelle As Range Dim wks As Worksheet Set wks = ThisWorkbook.Worksheets("Tuncel") For Each rngZelle In wks.Range("H3:H40") If Month(rngZelle.Value) = Month(Date) And Day(rngZelle.Value) = D...
18.09.2018 09:26:58
Thread-ID: 1646109
11 Beiträge
Anzeige
DropDown ohne leere Zellen Matrix mit Spalten
AxelF1977

Hallo zusammen,
ich brauche für eine Tabelle ein DropDown, das dynamisch je Zeile funktioniert.
Ein DropDown mit Zeilen als Matrix sind kein Problem, auch nicht die die leeren Zellen zu entfernen.
Schwieriger stellt es sich nun heraus, das Selbe zu machen, wenn die Matrix des Dro...
02.08.2019 13:24:31
Thread-ID: 1705566
4 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige
Anzeige

Infobox / Tutorial

ComboBox in Excel: Leere Zellen Ignorieren

Schritt-für-Schritt-Anleitung

Um in einer ComboBox in Excel leere Zellen zu ignorieren, kannst Du den folgenden VBA-Code verwenden. Dieser Code sorgt dafür, dass nur die Zellen mit Werten in die ComboBox eingetragen werden:

  1. Öffne Deine Excel-Datei und drücke ALT + F11, um den VBA-Editor zu öffnen.
  2. Füge in das entsprechende UserForm den folgenden Code ein:
Private Sub UserForm_Initialize()
    Dim i As Long
    With ComboBox1
        For i = 1 To 17
            If Not IsEmpty(Sheets("Eingaben").Cells(i, 4)) Then
                .AddItem Sheets("Eingaben").Cells(i, 4)
            End If
        Next
    End With
End Sub
  1. Stelle sicher, dass Du den Bereich der Zellen, die Du einfügen möchtest, anpasst (in diesem Fall D1:D17).
  2. Schließe den VBA-Editor und teste die ComboBox.

Häufige Fehler und Lösungen

  • Problem: Leere Zellen werden trotzdem angezeigt.

    • Lösung: Überprüfe, ob der Code für die ComboBox korrekt ist. Stelle sicher, dass die IsEmpty-Überprüfung vorhanden ist.

  • Problem: Die ComboBox zeigt keine Werte an.

    • Lösung: Stelle sicher, dass die Tabelle "Eingaben" existiert und die Werte in den Zellen tatsächlich vorhanden sind.

Alternative Methoden

Eine alternative Methode, um leere Zellen in Excel zu ignorieren, besteht darin, die Werte zuerst zu sortieren und dann in die ComboBox einzufügen. Hier ein Beispiel:

Private Sub UserForm_Initialize()
    Dim i As Long
    Worksheets("Eingaben").Range("D1:D17").Sort Key1:=Range("D1"), Order1:=xlAscending, Header:=xlGuess
    With ComboBox1
        For i = 1 To 17
            If Not IsEmpty(Sheets("Eingaben").Cells(i, 4)) Then
                .AddItem Sheets("Eingaben").Cells(i, 4)
            End If
        Next
    End With
End Sub

Diese Methode sorgt dafür, dass die Liste alphabetisch sortiert ist und leere Zellen ignoriert werden.

Praktische Beispiele

Wenn Du eine Excel-Liste hast, die beispielsweise die Namen von Produkten enthält und einige Zellen leer sind, kannst Du den oben genannten VBA-Code verwenden, um sicherzustellen, dass nur die Namen in der ComboBox angezeigt werden. Dies ermöglicht eine benutzerfreundliche Auswahl und verhindert Verwirrung durch leere Einträge.

Tipps für Profis

  • Um die Performance zu verbessern, kannst Du den Bereich der Zellen dynamisch erfassen, anstatt eine feste Anzahl (z. B. D1:D17) zu verwenden. Dies ist besonders nützlich, wenn Du oft neue Daten hinzufügst.

  • Überlege, ob Du die Datenquelle für die ComboBox über eine Tabelle anstelle von festen Zellbezügen definierst. So kannst Du leere Zellen noch einfacher ignorieren und die Wartung wird erleichtert.

FAQ: Häufige Fragen

1. Wie kann ich die ComboBox mit einer größeren Datenmenge füllen? Du kannst die Schleife im Code anpassen, um einen größeren Bereich zu durchlaufen. Achte darauf, dass Du leere Zellen weiterhin ignorierst.

2. Gibt es eine Möglichkeit, die ComboBox automatisch zu aktualisieren? Ja, Du kannst die Methode UserForm_Initialize anpassen, um die ComboBox bei jeder Öffnung des UserForms zu aktualisieren.

3. Wie sortiere ich die Liste alphabetisch? Verwende die Sortierfunktion in Excel, bevor Du die Werte in die ComboBox einfügst, wie im Beispiel gezeigt.

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige