Ha ich komme weiter
Also es funktioniert jetzt soweit wieder dass er die Daten holt.
Das mit der Abbruchfunktion hab ich noch nicht ganz durchstiegen wo die genau hin muss. Weil du ja meintest
If Not finden Is Nothing Then
End If
Aber fehlt mir da nicht das Else if weil mit einer einfachen Funktion sag ich ja nur was er macht wenn er den Wert nicht findet. In dem Fall MsgBox. Ich muss ja aber auch angeben wenn er Sie findet, dass er dann die Werte übernimmt oder?
Ah ok super hab das bisher mit dem Add.Item gemacht und entnehme die Daten dafür Dummerweise aus der Datei A und dort aus dem Blatt "Daten".
Hintergrund ist, dass der Mitarbeiter diese Daten ändern darf. Er kann dort neue Sachbearbeiter hinzufügen etc. Während die anderen Daten in Datebi B nur über eine Schnittstelle eingetragen werden und vom Mitarbeiter gar nicht gesehen werden sollen um möglichen Schummel zu unterbinden. Es wäre ja sonst möglich den Namen oder den Arbeitsplatz zu ändern an dem der Fehler aufgetreten ist. Ich weiß ich weiß Vertrauen ist der Grundstein aber ja hat alles leider seine Gründe.
Jetzt hab ich aber eben das Problem dass er seitdem ich die Datei B einlese die Werte nicht mehr sauber übernimmt, obwohl diese eigentlich ja mit dem Befehl (wkbB.Close Savechanges:=False) geschlossen wird. Aber ich schau mir das mit der .list Funktion morgen mal in Ruhe an
|