Live-Forum - Die aktuellen Beiträge
Datum
Titel
19.04.2024 12:23:24
19.04.2024 11:45:34
Anzeige
Archiv - Navigation
232to236
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
232to236
232to236
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Listbox ZeilenAnzahl

Listbox ZeilenAnzahl
20.03.2003 16:03:30
Jens
Hallo zusammmen
in der Listbox1 werden beim Afruf der UF bereits Werte eingelesen. Nun möchte ich die Möglichkeit haben weitere Werte in die listbox zu kopieren. Dazu verwende ich folgenden Code:

'Public Zeile As Integer

With ListBox1
.ColumnWidths = "5,5cm;1cm;0,75cm"
.AddItem TextBox9.Value
.List(Zeile, 1) = ComboBox3.Value
.List(Zeile, 2) = TextBox11.Value
'.List(Zeile, 3) = TextBox2.Value
Zeile = Zeile + 1
End With

Nur bei dem Code wird Zeile beim erste neuen Eintrag auf 1 gesetzt und damit die Werte der Spalten 2 und 3 in der 1.Zeile der Listbox überschrieben. Wie kann ich den Befehl Zeile=Zeile+1
ersetzen das immer unterhalb der letzten Eintragung eingefügt wird? Ist Listindex ?

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

Betreff
Datum
Anwender
Anzeige
Re: Listbox ZeilenAnzahl
20.03.2003 16:23:41
Andi_H

hi,

zeile = cells(65000,1).end(xlup).offset(1,0).row

spalte 1 wird von zeile 65000 nach oben durchlaufen bis zum letzten eintrag, geht dann eine zeile nach unten und weist "zeile" den wert den aktuellen zeile zu

gruß

andi

Re: Listbox ZeilenAnzahl
20.03.2003 16:29:06
L.Vira

Zeile = listbox1.listcount+1

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige