A simplified example
Sub Req_FieldChange(FieldName)
On Error Resume Next
if FieldName = "RQ_USER_18" then
dim msg
set msg = Req_Fields.Field("RQ_REQ_ID").Value
MsgBox ("msg holds " & msg)
set msg = nothing
end if
On Error GoTo 0
End Sub
This code incidentally returns nothing in the message box
