Live-Forum - Die aktuellen Beiträge
Datum
Titel
25.04.2024 00:42:03
Listbox mit gefilterten Daten füllen
24.04.2024 20:38:58
Summe mit Bedingung, nur letzte Ergebnisse anzeigen
24.04.2024 19:29:30
Formel filter
24.04.2024 18:49:56
merge & select
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
896to900
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
896to900
896to900
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

ListBox Laufzeitfehler 381

ListBox Laufzeitfehler 381
21.08.2007 23:17:00
Mike
Hallo liebes Forum.
Ich habe mir aus dem Archiv eine ListBox zusammen gestellt.
Leider komme ich jetzt nicht mehr weiter, weil ich nicht weis, wo der Fehler liegt.
Ich möchte mir in einer ListBox 2 Spalten anzeigen lassen. Ich habe es soweit geschafft, mir nur die Daten (ohne Leerzellen in der 1 Spalte) anzeigen zu lassen, die auch vorhanden sind. Dann kann ich die Daten über einen Button sortieren. Funktioniert auch prima. Aber ich bekomme leider die zweite Spalte nicht hin. Dort wird mir immer nur ein Wert angezeigt.
Vielleicht kann mir ja jemand helfen. Fürs bessere Verständnis hier meine Test Datei
https://www.herber.de/bbs/user/45253.xls
Danke im voraus für die Hilfe.
Gruß, Mike

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: ListBox Laufzeitfehler 381
22.08.2007 03:19:24
fcs
Hallo Mike,
du muss deine Prozedur zum Initialisieren des Userforms wie folgt anpassen, damit auch die 2. Spalte mit eingelesen wird.
Leider funktioniert dann die Sortierfunktion nicht mehr korrekt.
Es gibt hier im Forum eine Super-Lösung zum sortieren von mehrspaltigen Listboxen. leider ist mir der Link dorthin abhanden gekommen Suche mal unter den Stichworten Listbox +sortieren im Archiv. Dort solltest du fündig werden.
Gruß
Franz

Private Sub UserForm_initialize()                'in UserForm1 > ShowModal = False setzen
Dim i As Integer
Dim sh As Worksheet
Set sh = Sheets("Übersicht")
'ListBox1.ColumnCount = 2                            '2 = Anzahl Spalten
'ListBox2.ColumnCount = 2                            '2 = Anzahl Spalten
'ListBox3.ColumnCount = 2                            '2 = Anzahl Spalten
For i = 4 To 103
If sh.Cells(i, 5)  "" And sh.Cells(i, 4)  "" And Month(Cells(i, 5)) = Month(Date) - 1  _
Then
ListBox1.AddItem sh.Cells(i, 5)         '5 = Spalte E
ListBox1.List(ListBox1.ListCount - 1, 1) = sh.Cells(i, 4)  '4 = Spalte D
End If
If sh.Cells(i, 5)  "" And sh.Cells(i, 4)  "" And Month(Cells(i, 5)) = Month(Date) Then
ListBox2.AddItem sh.Cells(i, 5)         '5 = Spalte E
ListBox2.List(ListBox2.ListCount - 1, 1) = sh.Cells(i, 4)  '4 = Spalte D
End If
If sh.Cells(i, 5)  "" And sh.Cells(i, 4)  "" And Month(Cells(i, 5)) = Month(Date) + 1  _
Then
ListBox3.AddItem sh.Cells(i, 5)         '5 = Spalte E
ListBox3.List(ListBox3.ListCount - 1, 1) = sh.Cells(i, 4)  '4 = Spalte D
End If
Next i
End Sub


Anzeige
AW: ListBox Laufzeitfehler 381
22.08.2007 09:09:00
Mike
Hallo Franz.
Das war genau das was ich brauchte.
Den "ListBox1.List(ListBox1.ListCount - 1, 1)" hatte ich zwar schon mal gehabt, funktionierte bei mir nur nicht.
Das mit dem sortieren ist mir klar, dass ich das noch anpassen muß. Es liegt noch einiges an Arbeit vor mir.
Also... vielen Dank für Deine Hilfe.
Gruß, Mike

13 Forumthreads zu ähnlichen Themen

Listbox Laufzeitfehler 381
Jörg

Hallo Forum,
ohne große Umschweife:
ich erhalte folgende Meldung: Laufzeitfehler 381, Eigenschaft List konnte nicht gesetzt werden. Index des Eigenschaftsfeldes ungültig. Und beim Debug ... Eigenschaft List konnte nicht abgerufen werden.
Umstände: ich wähle aus einer Tabelle in unte...
07.01.2011 09:16:14
Thread-ID: 1194088
3 Beiträge
Anzeige
Listbox.colums bringt Laufzeitfehler 381
VG

Hallo ans Forum,
ich möchte die Daten einer externen Tabelle in meiner Userform in eine Listbox schreiben. Dazu gibt es 2 Alternativen:
1. Alle Daten sollen übernommen werden
Dies realisiere ich über eine CheckBox. Siehe If...
2. Nur die Daten, die in Spalte 1 einer vorher einge...
16.10.2012 12:39:29
Thread-ID: 1282246
8 Beiträge
Laufzeitfehler 381 bei Löschen Wert in Combobox
George

Hallo zusammen
Bin wieder mal auf ein Problem gestossen, das meine vba-Kenntnisse überfordert.
Mittels nachfolgendem Makro weise ich der ComboBox16 den ersten Wert der ComboBox17 (hat 2 _
Spalten) zu. Soweit so gut. Private Sub ComboBox17_Change() Me.ComboBox17.SetFocus a1 = Me.Co...
28.10.2013 09:20:07
Thread-ID: 1336100
8 Beiträge
Anzeige
Laufzeitfehler 381
Tobias

Hallo,Bei Auswahl aus einer ComboBox erhalte ich einen LFZ '381'. Meldung: Eigenschaft List konnte nicht abgerufen werden. Index des Eigenschaftsfelds ungültig. Die betroffene Zeile sieht so aus:Cells(ActiveCell.Row, 1) = ComboBox2.List(ComboBox2.ListIndex, 1)Was kann ich dagegen tun? Weiß jema...
07.05.2003 17:34:06
Thread-ID: 253416
3 Beiträge
Listenfeld füllen - Laufzeitfehler 381
Robs

Hallo Leute,
nach meinem ersten Posting (gegen 09:00 Uhr) habe ich sehr gute Hilfe bekommen, allerdings ergibt sich nun folgendes Problem:
ich möchte meine ListBox1 mit einem array (myarray) füllen, bekomme aber die Fehlermeldung "Laufzeitfehler 381"
Weiß jemand Abhilfe?
With...
15.11.2004 10:17:43
Thread-ID: 517512
3 Beiträge
Laufzeitfehler 381
Julia

Hallo,
also ich habe da eine listbox. die benutzte ich um aktuelle werte anzuzeigen udn wieder zu löschen...an sich funktioniert alles...aber lieder nur an sich.
also wenn im schleifendurchlauf n ein wert hinzugefügt wird(dieser wird dann im schleifendurchlauf n+1 wieder gelöscht) und d...
13.11.2006 13:17:30
Thread-ID: 819139
9 Beiträge
860to864: Laufzeitfehler 381
Wolfgang
Hallo,
per rechtem Mausklick wird ein UF in bestimmten Tabellenblättern geöffnet; Klicke ich in Spalte A bis C, funktioniert das auch wunderbar, klicke ich in Spalte D und folgende, erscheint Fehlermeldung Laufzeitfehler 381, Could not get the List property. Invalid property array index.- Wie m...
11.04.2007 20:18:07
Thread-ID: 861756
4 Beiträge
Daten in Listbox einlesen - Laufzeitfehler 381
André

Hallo zusammen,
ich habe schon mit Interesse einige Beiträge in diesem Forum gelesen, aber irgendwie stehe ich auf dem Schlauch und komme mit meinem Problem nicht weiter.
Ich möchte in eine Listbox mit Namen "Auftragspositionen" den Wert von "Kundenauftrag" einlesen und zwar an Position...
06.02.2008 09:48:54
Thread-ID: 948945
3 Beiträge
Anzeige

Links zu Excel-Dialogen

ListBox 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
3
7
7
2
2
2
8
3
2
4
5
9