Live-Forum - Die aktuellen Beiträge
Datum
Titel
23.04.2024 22:08:10
Auflisten in Spalte VBA
23.04.2024 21:33:46
Nur farbige/nicht farbige Zellen markieren
23.04.2024 21:29:56
Bestimmte Zellen auf andere Arbeitsblätter kopieren
23.04.2024 17:41:19
Link erstellen mit Formel oder VBA?
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1912to1916
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
1912to1916
1912to1916
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

ActiveX Listbox, Leere Zellen ignorieren

ActiveX Listbox, Leere Zellen ignorieren
20.12.2022 12:07:49
Randal
Hallo Leute,
ne kurze Frage:
Wie kann ich bei einer ActiveX Listbox die EInstellungen so ändern, dass er leere Zellen, in der Anzeige ignoriert?
Man kann ja die Range auswählen, bspw. A1:A30
Und wenn in A2 was steht, soll die Zelle A2 ganz oben in der Listbox angezeigt werden.
Danke euch!

11
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: ActiveX Listbox, Leere Zellen ignorieren
20.12.2022 12:21:30
GerdL
Moin Randal!

Private Sub ListBox1_GotFocus()
Dim X As Long
ListBox1.Clear
For X = 1 To 30
If Not IsEmpty(Cells(X, 1)) Then
ListBox1.AddItem Cells(X, 1).Text
End If
Next
End Sub
Gruß Gerd
AW: ActiveX Listbox, Leere Zellen ignorieren
20.12.2022 12:34:27
Elias
Hallo Gerd,
danke schonmal für die Antwort.
Funktioniert leider nicht.
Hier die Beispieldatei
https://www.herber.de/bbs/user/156852.xlsm
AW: ActiveX Listbox, Leere Zellen ignorieren
20.12.2022 12:51:09
GerdL
Hallo, bei mit hat es funktioniert.
Dass deine Liste auf einer zweiten Tabelle ist, hast du verschwiegen.
Entferne im Eigenschaftenfenster bei der Listbox1 den Eintrag bei Listfillrange
und stelle den Code ins Codefenster von Tabelle1

Private Sub ListBox1_GotFocus()
Dim X As Long
ListBox1.Clear
For X = 1 To 30
If Not IsEmpty(Tabelle2.Cells(X, 1)) Then
ListBox1.AddItem Tabelle2.Cells(X, 1).Text
End If
Next
End Sub
Gruß Gerd
Anzeige
AW: ActiveX Listbox, Leere Zellen ignorieren
20.12.2022 13:23:39
Randal
Sorry, ja genau so.
Jetzt bekomme ich allerdings eine Fehlermeldung, dass "ein nicht näher bezeichneter Fehler" vorliegt.
Die ListBox1.Clear Zeile wird markiert
Gruß
https://www.herber.de/bbs/user/156855.xlsm
AW: ActiveX Listbox, Leere Zellen ignorieren
20.12.2022 14:24:13
Beverly
Weil du den Hinweis
  • Entferne im Eigenschaftenfenster bei der Listbox1 den Eintrag bei Listfillrange

    • nicht beachtet hast.
    Bis später
    Karin
    AW: ActiveX Listbox, Leere Zellen ignorieren
    20.12.2022 14:06:52
    Alwin
    Hallo,
    eine weitere Möglichkeit:
    https://www.herber.de/bbs/user/156856.xlsm
    Gruß Uwe
    Anzeige
    AW: ActiveX Listbox, Leere Zellen ignorieren
    20.12.2022 14:15:15
    Randal
    Hey Uwe,
    ich hab deinen Code jetzt mal 1:1 kopiert, allerdings zeigt er mir jetzt eine Fehlermeldung in der Zeile
    
    Tabelle1.ListBox1.List = arrList
    Muss ich vielleicht noch im Eigenschaftenfenster der ListBox was ändern?
    Gruß
    AW: ActiveX Listbox, Leere Zellen ignorieren
    20.12.2022 14:21:59
    GerdL
    Den Listfillrange leeren, wie gehabt.
    Gruß Gerd
    AW: ActiveX Listbox, Leere Zellen ignorieren
    20.12.2022 14:24:00
    Randal
    Daran hats gelegen!
    Vielen lieben Dank euch.
    AW: ActiveX Listbox, Leere Zellen ignorieren
    20.12.2022 14:28:05
    Alwin
    Hallo,
    in den Eigenschaftenfenster rechts neben Listfillrange den Eintrag:
    
Tabelle2!A1:A30
    entfernen.
    Gruß Uwe
    AW: ActiveX Listbox, Leere Zellen ignorieren
    20.12.2022 18:09:51
    Herbert_Grom
    Hallo Randal oder Elias oder Babak,
    da das Ganze mit einer For-Next-Schleife, bei einer längeren Liste, evtl. doch etwas länger dauert, würde ich dir eine Füllung, wie in meinem Vorschlag, empfehlen.
    https://www.herber.de/bbs/user/156865.xlsm
    Servus
    Anzeige

    327 Forumthreads zu ähnlichen Themen

    Gültigskeitsprüfung mit leerer Zelle
    Franz

    Guten Abend!
    Habe 9 Spalten mit Dropdowns gefüllt. Wie bekomme ich den nachfolgenden Code (Quelle: Archiv) eleganter hin, dh. ohne for next Schleife und dadurch schneller. Der Datenbereich heistt "Printarea".
    Private Sub Worksheet_Change(ByVal Target As Range) Dim i As Integer For i =...
    14.09.2008 20:56:00
    Thread-ID: 1009627
    11 Beiträge
    Anzeige
    Inhalt von UF wird nicht angezeigt
    UF

    Hi Forum,
    ich starte meine UF mit dem folgenden Code:
    Sub auto_open() Application.WindowState = xlMinimized UF_BitteWarten.Show vbModeless Application.Run "RESETMASK" UF_BitteWarten.Hide UF_Maske.Show End Sub
    Wie zu erkennen, wird beim Start ein Reset ausgeführt, der einige Sekun...
    26.09.2008 14:29:02
    Thread-ID: 1012639
    16 Beiträge
    Gültigkeitsliste ohne Zellenbereich
    Reinhard

    Hallo Wissende,
    Sub Makro1() With Range("P2").Validation .Delete .Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, Operator:= _ xlBetween, Formula1:="a;b;c" .IgnoreBlank = True .InCellDropdown = True .InputTitle = "" .ErrorTitle = "" .InputMessage = "" .ErrorMessage = "" .ShowInput...
    02.11.2008 16:48:00
    Thread-ID: 1021179
    4 Beiträge
    Anzeige
    langer Text wird nicht mehr angezeigt
    u_hoernchen

    Ich muss einen langen Text (ca. 1.500 Zeichen) in eine Excel-Zelle schreiben (geht leider nicht anders, also das bitte nicht in Frage stellen). Nun wird beim Ausdruck und bei der Bildschirmanzeige aber die letzte Zeile nicht mehr umgebrochen (Zeilenumbruch ist formatiert), in der Zelle steht ab...
    05.01.2009 11:10:25
    Thread-ID: 1036916
    4 Beiträge
    Ribbon-DropDown-Listenfeld variabel füllen?
    Kasimir

    Hallo an alle!
    Ich habe da mal eine Frage bezüglich der Excel 2007 Ribbons.
    Zum Verständnis, ich habe eine xls-Datei, in der ich beim Starten eine neue Symbolleiste erzeuge. Diese neue Symbolleiste hat u.a. ein msoControlComboBox, die ich über eine Schleife mit bestimmten Tabellenblattn...
    17.01.2009 07:23:00
    Thread-ID: 1040862
    3 Beiträge
    Zeile mit optisch leerer Zelle löschen
    Werner

    VBA-Level: befriedigend
    Hallo Freunde,
    eine Tabelle (Worksheet) hat mehrere Spalten, beginnend ab Spalte A. Spalte A enthält Stringwerte.
    Einige der Zellen in Spalte A sind optisch leer.
    Nun sollen alle diejenigen Zeilen, bei denen die Zellen in Spalte A optisch leer sind, gelös...
    13.03.2009 11:21:32
    Thread-ID: 1059795
    10 Beiträge
    Wert wird nicht angezeigt
    Markus

    Hallo,
    habe folgendes Problem:
    Ich lasse mir einen Wert per VBA ausrechnen und dann mit Range... im Tabellenblatt anzeigen.
    Das Problem ist, dass der Wert nicht angezeigt wird.
    Wenn ich denn Programmcode per Einzelschritt debugge, dann wird der Wert komischerweise angezeigt!
    ...
    20.07.2009 11:00:55
    Thread-ID: 1089939
    6 Beiträge
    Geöffnete Datei wird nicht angezeigt...
    Ruediger

    Hallo zusammen,
    ich habe eine Datei - mit einigen Verknüpfungen auf eine andere Datei - versuchen wollen zu öffnen. Ich werde auf gefragt, ob ich aktualisieren will oder nicht. Drücke ich aktualisieren als auch nicht aktualisieren, wird die Datei zwar geöffnet, aber nicht angezeigt.
    Wo...
    22.07.2009 17:02:42
    Thread-ID: 1090605
    3 Beiträge
    Anzeige

    Links zu Excel-Dialogen

    ListBox

    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
    10
    1
    15
    3
    2
    3
    2
    9
    5
    2
    3
    7
    2
    5
    11
    3
    5
    2
    5
    2
    2
    6
    7
    1
    2