Ich habe folgendes Problem und hoffe hier Hilfe zu finden:
In einer ComboBox werden Kennungen von Material wiedergegeben (einzigartige Kennungen) und anschließend wird die anschließende Gesamtlänge in einer Textbox ausgegeben (Textbox2). So weit funktioniert es schon mal.
Nun zum kniffligen Teil: Ich will einen Wert in einer Textbox3 eingeben und dieser soll von der Gesamtlänge abgezogen werden und dann in die Datenbank übernommen werden.
Ich habe folgendes probiert:
Dim newdiff As Long
Dim gefundenerWert As Range
newdiff = TextBox2.Value - TextBox1.Value
gefundenerWert = Worksheets("DatenbankMaterial").Range("B1:B1000").Find(ComboBox1.Value)
Worksheets("Datenbank Material").Range("D" & gefundenerWert.Row) = newdiff
Leider funktioniert der Code nur bis gefundenerWert :). Ich hoffe ihr könnt mir da weiterhelfen anbei eine Maske zum besseren Verständnis.
LG
Ivo