ich hab mal wieder ein Problem.
Ich nehme eine Veränderung über die UserForm vor und schreibe in ein Textfeld eine Spalte, zum Beispiel Z. Ich hab eine Funktion geschrieben, welche die Zelle im Excel-Sheet selbst dann mit dem Wert aus dem Textfeld überschreibt.
So sieht meine Funktion bisher aus:
Public Function ueberschreiben(code As String, eingabefenster As String)
Dim Zelle As String
Zelle = Sprache.suche_Text(code)'sucht die passende Zelle
lz = Sheets("Tabellenblatt1").Cells(Rows.Count, 28).End(xlUp).Row 'letzte Zeile
' Der übergebene Suchstring wird aus der Tabelle rausgesucht und der dazugehörige Text ausgewä _
_
hlt.
For i = 3 To lz
If Sheets("Tabellenblatt1").Range("AB" & i) = code Then
Zelle = eingabefenster
End If
Next i
End Function
'Funktionsaufruf
ueberschreiben("B001", TextBox.Text) = TextBox.Value
Er bringt mir den Fehler Objekt erforderlich. Kann da jemand schnell helfen?
Gruß
Sepp