Update VBA code (1 Viewer)

lucy1216

Registered User.
Local time
Today, 04:40
Joined
Feb 28, 2013
Messages
11
Please keep in mind that I am just starting out using VB. What I am trying to accomplish is this:

I have a click event:

Private Sub cbtnApproverSendApproval_Click()
On Error GoTo Err_cbtnApproverSendApproval_Click

Dim stDocName As String
stDocName = "mcrEmailIncoming"

*****
DoCmd.RunMacro stDocName

Exit_cbtn etc. etc.

In the "*****" area I would like to update tblReceiveTemp.ATTReceiveStatus to "R"
WHERE
[Form]![frmApprover_MainMenuTabbed]![ATT App (1) Not App (2)] = 1
AND
[Form]![frmApprover_MainMenuTabbed]![cbfrmApproverName] = tblReceivingTemp.Level 1Approver
Note: the "ATT App (1) .." is an option group.

Can someone assist me in building this code?:)
 

Rx_

Nothing In Moderation
Local time
Today, 05:40
Joined
Oct 22, 2009
Messages
2,803
Noticed that you have not got a response yet.
Suggesting it is a little too vague.
It appears that an execute for an update query - passing in the record ID is along the lines, but it is difficult to say.

Let me suggest that you visit the Sample Database link on this site.
If you are a self-proclaimed beginner, it might be useful to search and download several dozen samples. Then find some basic ideas of what you want to accomplish.
As a mid-level programmer, I still visit this often. There are many great examples for someone like ourselves.
Look forward to your next post.
 

lucy1216

Registered User.
Local time
Today, 04:40
Joined
Feb 28, 2013
Messages
11
Thank you for your response; however, I got it figured out!
 

Users who are viewing this thread

Top Bottom