Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.04.2024 13:43:14
Uhrzeit-Angabe
28.04.2024 11:30:20
Pivot Balken und Kreisdiagram Darstellung /Beschriftung
28.04.2024 11:05:44
datum automatisch ändern und einfügen
28.04.2024 10:11:19
Nur aktuelle und direkte Unterordnen durchsuchen
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1924to1928
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
1924to1928
1924to1928
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

ListBox mit 2 Spalten befüllen

ListBox mit 2 Spalten befüllen
16.03.2023 11:38:06
krug96

Hallo,

ich stehe gerade auf dem Schlauch, was ListBoxen angeht.
Ich habe ein Array mit 10 Spalten und n-Zeilen
Aus diesem Array möchte ich nur die Infos aus der Spalte 1 und Spalte 2 in eine ListBox mit 2 Spalten anzeigen.

Leider klappt das nicht wirklich.

Kann mir jemand eine einfache Lösung nennen?

Vielen Dank für eure Hilfe.

9
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: ListBox mit 2 Spalten befüllen
16.03.2023 11:56:33
Rudi Maintaire
Hallo,
musst du in ein anderes Array 'umschaufeln'.
z.B.
Function ListArray(DeinArray)
  Dim tmp(), i As Long
  ReDim tmp(1 To UBound(DeinArray), 1 To 2)
  For i = 1 To UBound(DeinArray)
    tmp(i, 1) = DeinArray(i, 1)
    tmp(i, 2) = DeinArray(i, 2)
  Next i
  ListArray = tmp
End Function
Zuweisen mit
ListBox1.List = ListArray(DeinArray)
Gruß
Rudi


AW: ListBox mit 2 Spalten befüllen
16.03.2023 17:33:21
krug96
Hallo Rudi,

danke für die Zeilen, das hat soweit auch geklappt.
An welcher Stelle dieser Funktion muss ich die Abfrage gesetzt werden, wenn leere Zeilen aus dem "DeinArray" nicht in der ListBox angezeigt werden sollen.

If Not DeinArray(i, 1) = "" Then

Vielen Dank.


Anzeige
AW: ListBox mit 2 Spalten befüllen
17.03.2023 09:33:43
krug96
Guten Morgen Rudi,

wäre das eventuell auch über AddItem - auch wenn es dadurch etwas länger dauert - lösbar?

Vielen Dank für die Hilfe
LG


AW: ListBox mit 2 Spalten befüllen
17.03.2023 11:12:55
Herbert_Grom
Hallo,

warum willst du das mit "AddItem" lösen? Möchtest du irgendwelche Inhalte ausschließen?

Servus


AW: ListBox mit 2 Spalten befüllen
17.03.2023 15:25:27
krug96
Hallo,

das liegt daran, weil ich in meinem Code bisher immer mit AddItem gearbeitet hatte. :-)
Lag aber auch daran, weil ich mich mit dem anderen Weg noch nicht wirklich auseinandergesetzt hatte.

Gruß
Michael


Anzeige
AW: ListBox mit 2 Spalten befüllen
17.03.2023 12:48:20
Rudi Maintaire
Hallo,
  Function ListArray(DeinArray)
    Dim tmp(), i As Long, j As Long
    ReDim tmp(1 To 2, 1 To UBound(DeinArray))
    
    For i = 1 To UBound(DeinArray)
      If DeinArray(i, 1) > "" Then
        j = j + 1
        tmp(1, j) = DeinArray(i, 1)
        tmp(2, j) = DeinArray(i, 2)
    Next i
    
    ReDim Preserve tmp(1 To 2, 1 To j)
    ListArray = Application.Transpose(tmp)
    
  End Function
Gruß
Rudi


AW: ListBox mit 2 Spalten befüllen
17.03.2023 15:18:39
krug96
Hallo Rudi,

genau so wollte ich das haben... allerdings musste ich da noch ein End if und y = 0 setzen
Vielen Dank.

LG
Michael


Anzeige
AW: ListBox mit 2 Spalten befüllen
17.03.2023 11:21:56
Daniel
Hi
kommt jetzt darauf an.
Wenn die Listbox das ganze Array enthalten soll, aber nur 2 Spalten angezeigt werden sollen, könntest du das über die ColumnWidth lösen
hierfür für die ersten Beiden Spalten einen Wert &gt0 angeben und für die alle folgenden Spalten 0.
Das kann programmieren, oder aber auch in der Eigenschaftsliste direkt angeben (.ColumnWidth = "10;10;0;0;0;0")

wenn die Listbox nur 2 Spalten bekommen soll, könnte man das Array auch mit RedimPreserve beschneiden:
Y = Range(...).value
X = Y
Redim Preserve X(1 to ubound(x), 1 to 2)
Listbox1.List = X
Gruß Daniel


Anzeige
AW: ListBox mit 2 Spalten befüllen
17.03.2023 15:22:13
krug96
Hallo Daniel,

vielen Dank für Deinen Ansatz und Deine Hilfe.
Das von Rudi passt nun. Darauf kann ich auch weiter aufbauen.

Grüße
Michael

277 Forumthreads zu ähnlichen Themen

Tabellenblätter miteinander verknüpfen
Ephraim

Guten Morgen,
leider schaff ich es nicht, zwei Tabellenblätter in einer Datei miteinander zu verknüpfen. Was in Tabellenblatt 1 steht soll auch automatisch in TB2 übertragen werden. Optimalerweise soll in TB 2 lediglich eine Spalte ausgefüllt werden. Der restliche Inhalt soll geschützt sein...
18.08.2008 07:19:00
Thread-ID: 1002497
4 Beiträge
Anzeige
Eingaben aus Tabellen mit Userform befüllen
Peter

Hallo wertes Forum
ich habe da mal wieder etwas und komme nicht so richtig weiter.
Ich habe eine Tabelle
In Spalten Namen und in Zeilen Datum
Nun möchte ich gern das ganze mit Userform befüllen
also eine combobox, die mir das Datum zurürck gibt und eine die Mir die Namen a...
06.09.2008 11:42:00
Thread-ID: 1007825
4 Beiträge
Spaltenwerte ausgewählter Tabellen kopieren
obelix-xxl

Hallo,
in mehreren Tabellen habe ich in der gleichen Spalte X11:X100 Summenwerte eingetragen.
Die Spaltenbeschriftung ist in der Zelle X10 und ist gleich dem Tabellennamen, z.B. -1.234.
Zur weiteren Verwendung möchte ich nur die Ergebnisse der markierten Tabellenblätter in eine neu...
07.09.2008 08:42:00
Thread-ID: 1007926
2 Beiträge
Anzeige
Verknüpfung mit vorigem Tabellenblatt
reiner

Hallo Leute
einer Datei wird jeden Monat ein neues dem dann aktuellen Monat entsprechendes Tabellenblatt hinzugefügt. Zelle Q3 des aktuellen Tabellenblattes soll den in Zelle A3 enthaltenen Wert des Vormonats (voriges Tabellenblatt) als Verknüpfung übernehmen.
Die hierfür erforderliche...
30.09.2008 09:20:35
Thread-ID: 1013261
5 Beiträge
Pivot-Tabellen mit gefilterten Werten möglich?
Andreas

Hallo Forum,
ich habe mal eine Frage bezüglich Pivot-Tabellen. Kann eine solche Tabelle schon vorher gefilterte Werte auswerten, ohne dass die herausgefilterten Zellen beachtet werden?
MFG Andreas
10.11.2008 11:29:00
Thread-ID: 1023155
5 Beiträge
Tabelle mittels eingebundenem Java jar-file füllen
Arthur

Ein fröhliches Hallo zusammen.
Ich habe ein Java jar-file, eingebunden in eine Excel-Datei. Die darin enthaltene Funktion soll per Knopfdruck aufgerufen werden, Daten aus einer anderen Anwendung abholen und das Ergebnis in einem Worksheet eintragen.
Der Knopfdruck samt Aufruf der Funkti...
27.11.2008 15:46:00
Thread-ID: 1028425
2 Beiträge
Tabellenbereich mit Array o.ä. füllen
dennis

Hallo zusammen,
weiss jemand eine Möglichkeit wie man mehrere Werte gleichzeitig in ein Exceltabellenblatt bekommt?
Mein Problem ist folgendes:
Ich berechne mir über eine Schleife die x,y Werte für ein Diagramm.
Diese würde ich gerne vorher speichern (z.B. in einem Array, bzw. M...
09.01.2009 15:02:04
Thread-ID: 1038249
10 Beiträge
Wie Säulendiagramm mit Tabelle mit gestapelten Säu
sohsoh

Hallo,
ich habe folgendes Problem und schon wie ein Irrer probiert, aber bis jetzt noch keine Lösung gefunden.
Ich habe zu Verschiedenen Stoffen jeweils 2 Messwerte in 3 Verschiedenen Zuständen. Jetzt möchte ich ein Säulendigramm erstellen in denen ich 3 Säulen (zu den drei Zuständen je...
14.01.2009 10:48:22
Thread-ID: 1039519
2 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
3
9
3
1
1
4
4
1
9
1
5
4
5
6
8
6
2
12
2
2
1
11
8
4
3