Anzeige
Archiv - Navigation
220to224
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
220to224
220to224
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Listbox

Listbox
20.02.2003 11:15:21
Holger Meinert
Hallo zusammen,
möchte eine Listbox mit Text füllen,den ich selbst vorgebe.
Die Listbox sollte wenn möglich 4 Spalten enthalten und wie folgt
aussehen:
Holger,PE Hannover,1,15
>nächster Eintrag
Nach Auswahl der richtigen Zeile in der Listbox sollen die Spalten 2-4(PE Hannover,1,15) in ein Tabellenblatt übernommen werden, z.B. in Zelle C1 die Spalte 2(PE Hannover) und die anderen beiden Spalten rechts daneben (C2=1 und C3=15).

Vielen Dank für die Hilfe !!

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

Betreff
Datum
Anwender
Anzeige
Re: Listbox
20.02.2003 12:26:14
ChrisL

Hallo Holger

Private Sub CommandButton1_Click()
Dim MyArray(1 To 2, 0 To 3)

ListBox1.ColumnCount = 4

MyArray(1, 0) = "Holger"
MyArray(1, 1) = "PE Hannover"
MyArray(1, 2) = "1"
MyArray(1, 3) = "15"

MyArray(2, 0) = "Holger2"
MyArray(2, 1) = "PE Hannover2"
MyArray(2, 2) = "12"
MyArray(2, 3) = "152"

ListBox1.List = MyArray
End Sub

Private Sub ListBox1_Click()
Range("C1") = ListBox1.Column(1)
Range("C2") = ListBox1.Column(2)
Range("C3") = ListBox1.Column(3)
End Sub


Gruss
Chris

Re: Listbox
20.02.2003 14:53:25
Holger Meinert

Danke!
super

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige