Tabelle füllen
29.01.2004 14:10:31
Lars H.
habe eine user form mit einer listbox und einem textfeld.
würde gerne der aus der listbox augelese wert ist 1 bis 65536 eine spalte zuordnen und dieser zelle die dabei rauskommt ...der nachbar also bei 2 wäre dies a2 und in b2 zwei soll nun die im textfeld eingetragene Zahl übergeben werden.mein code bisher...komm aber nicht weiter.bitte dringend um hilfe!!!
Public Sub Listbox_fuellen()
With ListBox1
.RowSource = "Tabelle1!$A$1:$A$65536"
End With
End Sub
Private Sub CommandButton1_Click()
Listbox_fuellen
End Sub
Private Sub CommandButton2_Click()
MsgBox (ListBox1.ListIndex + 1)
End Sub
Anzeige