Live-Forum - Die aktuellen Beiträge
Datum
Titel
16.04.2024 19:22:16
Von exceltabelle in word per steuerelement temarker
16.04.2024 18:50:53
Fehlermeldung bei Code - Excel speichern mit Bez. aus Zelle
16.04.2024 17:18:01
Projektplan-Tabelle oder Gantt ohne Balken
16.04.2024 17:05:25
formatierten Text direkt in Zelle einfügen
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
804to808
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
804to808
804to808
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

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!

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
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

33 Forumthreads zu ähnlichen Themen

Formel "MODALWERT" soll leere Zellen ignorieren
Martin

Hallo,
ich habe in 6 Spalten über mehrere hundert Zeilen hinweg Zahlenwerte. Über die Excel-Formel "MODALWERT" möchte ich von jeder Zeile die jeweils häufigsten Werte ermitteln. Leider kommt es sehr häufig vor, dass einige Zelle leer sind und die Excel-Formel "MODALWERT" als Ergebnis dann "...
16.02.2010 12:25:48
Thread-ID: 1138870
3 Beiträge
Anzeige
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
Leere Zellen ignorieren
Tim

Guten Tag,
mein Excel bringt mich momentan zu Verzweiflung. Ich habe auf eine Blätter verteilt Listen zur Auswahl von Daten. Immer mit leere Zeilen ignorieren. Nun nach 3-4 Listen ignoriert er für eine neue Liste die leeren Zellen nicht mehr. Dies ist extrem nervig... Hat jemand eine Idee w...
19.01.2015 11:12:19
Thread-ID: 1403611
5 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
Alifa

Hallo,
ich möchte aus Tabelle 5 Range C3:F20 alle Werte aufrufen. Leider sind auch leere Zellen dazwischen. Mein Ansatz: For Each Wert In Sheets("Tabelle5").Range(C3:F20").Value; wie erreicht man, dass nur gefüllte Zellen angesprungen werden? Danke im Voraus.
Gruß, Alifa
20.04.2016 09:07:19
Thread-ID: 1489082
6 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
2
7
2
4
7
8
20
3
8
5
4
16
3
18
3
10
5
3
11
4
1
2
2
1
3