hvorfor opdatere den samme

Hej !
Jeg kan ikke forstår at denne kode kun opdatere testperson 1 ligegyldigt hvilken testperson man har valgt, den skal tage værdien fra en rapport. Jeg kan se den tager det rigtige ID men den opdater hele tiden testperson nr 1

Dim dbs As database
    Dim rst As Recordset
   
 
   
    Set dbs = CurrentDb
    Set rst = dbs.OpenRecordset(\"Select * from Testpersoner_Stamdata where TestpersonID = [TestpersonID]\", dbOpenDynaset)

    With rst
        .Edit
        !udskrevet = -1
        .Update
    End With