Herbers Excel-Forum - das Archiv

Daten aus Listbox in Textbox einlesen und zurück i

Informationen und Beispiele zu den hier genannten Dialog-Elementen:
ListBox TextBox UserForm
Bild

Betrifft: Daten aus Listbox in Textbox einlesen und zurück i
von: edie

Geschrieben am: 30.07.2008 17:06:18

Hallo zusammen,
aus einem Tabellenblatt mit Daten in den Spalten A bis J ab Zeile 7, nach unten variabel,
werden Suchbegriffe gesucht und die Fundstellen, ganze Zeile, in eine Listbox eingelesen.
Nun möchte ich gerne die Daten bearbeiten bzw. editieren, dazu wird ein Datensatz in der Listbox per Doppelklick gewählt und in die 10 Texboxen (Spalten A bis J ergibt 10) eingelesen.
Nach dem Editieren sollen die Daten in der Listbox und Tabelle korrigiert werden.
Mit dem folgenden Code, aus dem Archiv, wird in der Listbox korrigiert in der Tabelle aber wird ein neuer Datensatz mit der Korrektur in die Zeile 7 eingefügt. Wieso wird nicht die richtige Zeile gefunden?
Liegt dass Problem in der Zeile: Cells(.ListIndex + 7, iCounter).Value? Die Tabelle beginnt ab der 7 Zeile.

Private Sub cmdInsert_Click()
Dim iCounter As Integer
For iCounter = 1 To 10
With UserForm1.ListBox1
.List(.ListIndex, iCounter) = _
Controls("TextBox" & iCounter).Text
Cells(.ListIndex + 7, iCounter).Value = _
.List(.ListIndex, iCounter)
End With
Next iCounter
End Sub


Kann mir jemand weiter helfen oder einen anderen Tipp geben?
Vielen Dank im Voraus.
Grüße

Bild

Betrifft: Lad mal eine Beispieldatei hoch o.w.T.
von: Ramses
Geschrieben am: 31.07.2008 05:27:29
...

Bild

Betrifft: AW: Lad mal eine Beispieldatei hoch o.w.T.
von: edie

Geschrieben am: 31.07.2008 14:20:52
Hallo Ramses,
vielen Dank, bin etwas im Verzug mit der Beispieldatei.
Hier Die Datei https://www.herber.de/bbs/user/54241.xls
Vielen Dank im Voraus.
Grüße

 Bild
Excel-Beispiele zum Thema "Daten aus Listbox in Textbox einlesen und zurück i"
Mehrfachauswahl aus ListBox auslesen Gefilterte Daten in eine ListBox einlesen
Dateien aus Listbox auslesen und öffnen Listbox-Eintrag durch Mausbewegung markieren
ListBox-Einträge auswechseln Horizontal angeordnete Elemente in eine ListBox übernehmen
Tabellenblattnamen in eine ListBox einlesen ListBox bei Eintrag erweitern
Text aus Textbox in Variable Namen von TextBoxes hochzählen