Hallo,
ich warte eine Datenbank (datenmäßig). Nun habe ich den Auftrag bekommen die Access-Datenbank um die Umsatzsteuer-ID zu erweitern.
Ich habe in die relevanten Tabellen Kundenstamm und Auftrag das Feld usid ergänzt.
Allerdings müssen alle Aufträge (5000 Stück) noch nachträglich mit der usid versehen werden. Die Beziehung ist 1:n.

Debitoren_Nr (Kunden) = Auftraggeber_Nr (Auftrag)


Wie formuliere ich den SQL-Befehl? (Ich möchte es per VBA-Script machen)

Dim SQLText As String
Dim SMSQL As String
    Dim db As DAO.Database

 SQLText = "UPDATE usid AS kunden INNER JOIN usid AS auftrag ON kunden.debitoren_nr =auftrag.auftraggeber_nr"
Set db = CurrentDb

    db.Execute SQLText
    MsgBox "Die Datensätze wurden geändert!", vbInformation

oder:


Private Sub Befehl0_Click()
Dim SQLText As String
    Dim db As DAO.Database
    
    SQLText = "INSERT INTO [auftrag]" & _
             " SELECT kunden.usid " & _
                "FROM [kunden] "
    Set db = CurrentDb
    db.Execute SQLText
    MsgBox "Die Datensätze wurden geändert!", vbInformation


            
Danke für die Mühe

Newbie929