|
Hallo,
und stehe vor einem Problem
ich habe zwei Textboxen erstellt - diese lassen sich befüllen und tragen die Werte in dei Tabelle ein. Genauso habe ich eine listbox ausfüllen lassen und mit doppelklick die Daten wieder in die Textboxen ausgeben lassen. Jetzt kommen wir zum Punkt Änderungen:
Ich versuche grad erfolglos nach der Eingabe von Name und Vorname und dem aufrufen der richtigen Zeile mit dem Namen und dem klick auf den cmd_button "Änderung" die richige Zeile zu finden und diese dann zu Überschreiben.
Plan ist, wenn ich nach der Auswahl in der listbox die Daten in der Textbox_Name und Textbox_Vorname ändere und auf "cmd_button Änderung" klicke diese Daten auch verändert
ein Versuch war:
Dim sh As Worksheet
Set sh = ThisWorkbook.Sheets("Statistik")
Dim Selected_Row As Long
Selected_Row = Application.WorksheetFunction.Match(CLng(Me.TextBox_Name.Value), sh.Range("A20:A"), 0)
sh.Range("A" & Selected_Row).Value = Me.TextBox_Name.Value
'sh.Range("B" & Selected_Row).Value = Me.TextBox_Vorname.Value
> für zu Typenunverträglichkeit
jetzt habe ich überlegt ob es geht mit
sh.Range("A" & find).Value = Me.TextBox_Name.Value
leider führt das auch zu einem Laufzeitfehler
Ich habe mir bereits Videos angesehen leider nutzen die immer eine ID in einer Spalte um dann auf die ID zuzugreifen - leider habe ich diese Möglichkeit nicht da sich die Daten immer ändern oder gelsöcht werden
Habt ihr eine Idee wie ich die gesuchte Zeile nach dem in dem Textbox_Name bereits ausgewähltem Namen mit der Spalte suchen kann um es zu überschreiben?
LG
Laufzeitfehler 1004 - Methode Range für das Objekt worksheet ist fehlgeschlagen
|