Über Listbox Leerzeile hinzufügen
27.09.2012 21:38:03
SoulOpa
ich habe hier im Forum folgenden Code gefunden mit den man in der Listbox eine Leerzeile hinzu fügen kann. Jetzt zu meiner Frage! kann man den Code so umbauen, das man eine stelle in der Listbox markiert, und dort wo markiert ist eine Leerzeile
hinzugefügt werden kann? am besten währe es wenn dieses auch gleich mit in der Tabelle übernommen wird. So zu sagen als neuen Absatz.
Leider wird in diesem Code ja immer in Zeile 5 eine Leerzeile eingefügt.
Private Sub CommandButton4_Click()
Dim iZeile As Integer
iZeile = "5"
With ListBox1
.AddItem "", iZeile
.List(iZeile, 1) = ""
'... usw....
End With
End Sub
Danke für Eure Bemühungen.
Schönen Abend
mfg Andi
Anzeige