Transfer values from report to table

[Akchayan]

Hello everyone,


I have this report here:

(The arrow points to a box, the variable in the box is called: "ID".)
I would like to transfer the value (marked with a green arrow) into the table "tblOfferte"(The column in which it is to be written is called: "IDCustomers".) when closing the report, for this I have written this code:

Private Sub Report_Close()
Dim db As DAO.Database
Dim rs As DAO.Recordset




Set db = CurrentDb




'Save Payroll Record'


    Set rs = db.OpenRecordset("tblOfferte")
        With rs
            .AddNew
            !IDCustomer = ID
          
            .update
        End With
    rs.Close
    Set rs = Nothing
    db.Close
    Set db = Nothing
    
    
End Sub

but it does not work.
How would it work?
Thanks for the help!

[Micron]

Is the value in some other table? If so it's very odd that you'd want to copy it to another table or field and even more odd that you'd want to get it from a report?
To get to your point, it could be because you're using the report close event for this, but I'm not real confident of that. Reports are weird in that they seem to behave the opposite way than forms do. Reports close first, then unload. You could try putting a breakpoint at the start of the code, attempt to close the report and step thru with F8 to see if it makes a difference. If it does, it could be a timing issue.

BTW, what does "does not work" mean?

[Akchayan]

Is the value in some other table? If so it's very odd that you'd want to copy it to another table or field and even more odd that you'd want to get it from a report?
To get to your point, it could be because you're using the report close event for this, but I'm not real confident of that. Reports are weird in that they seem to behave the opposite way than forms do. Reports close first, then unload. You could try putting a breakpoint at the start of the code, attempt to close the report and step thru with F8 to see if it makes a difference. If it does, it could be a timing issue.

BTW, what does "does not work" mean?

The value has to be entered by the user in a form, then he presses a button and it creates a PDF and closes automatically.
By it not working, I mean that this error occurs:

"Runtime error 2427

You have entered an expression without a value."

[Welshgasman]

Try the actual expression that control ID contains?

As always, WALK ​ through your code line by line and see what you actually have, not what you think you have.

[moke123]

(The arrow points to a box, the variable in the box is called: "ID".)

Is the textbox itself named "ID"?
I would try using the me. keyword with ID to be sure. Intellisense should kick in.

!IDCustomer = Me.ID

[Micron]

I think you're saying the needed value is in the report control that references the form (the one the green arrow points to), so why not use that? Maybe
!IDCustomer = Formular!foOfferteKundenDat ...
I can't see the rest of that so I put ellipses.