Help with creating button to update status

[NoiCe]

Hello,

I'm new to VBA and I'm trying to create a button in my form that when clicked will bring up a message that asks the user if they want to really "close" the ticket. If user selects yes, it will change the text box I have from OPEN (default value) to CLOSE and also update the status field with this info in the underlying table. Then the button should be grayed out whenever the status is closed. If no is selected then the status should remain as is...OPEN. This is for a help desk database.

Any help that you can provide is greatly appreciated!



Thank you.
J

[June7]

Code can easily set value in textbox and if textbox is bound to field, the value will pass into record. Graying the button depends on form design. Is the button in Detail section and is form in Continuous or Datasheet view?

[NoiCe]

It is in the Details section and I believe it's continous form. Screenshot attached

[June7]

Me!Status = "Closed"

Why bother graying the button? So what if they click it again, it just "closes" the record again, no harm.

Enabling or disabling the button will be in effect for all records.

[NoiCe]

Me!Status = "Closed"

Why bother graying the button? So what if they click it again, it just "closes" the record again, no harm.

Enabling or disabling the button will be in effect for all records.

June7, I need the question to be asked "Do you want to close this record" if user selects yes then me!status="closed". So basically I need a vbYes/No. Just not sure how to write this and where.

[June7]

If MsgBox("Do you want to close this record?", vbYesNo) = vbYes Then
Me!Status = "Closed"
End If

[NoiCe]

If MsgBox("Do you want to close this record?", vbYesNo) = vbYes Then
Me!Status = "Closed"
End If

Thanks June, this worked, however I tried to put this into a module and it keeps bringing up an error. How would I add this to a module?

[June7]

What error? If it worked, how can there be an error?

You said you want a button. This code would go in the button Click event procedure.