Add date to cell when another function is completed

I have a workbook (attached and scrubbed) that when I put a value in Col N (Funds Rcvd) AND when there is a value in Col K (USC MC) a function is kicked off.

What I need is that after this function is completed today's date gets input into Col P (Sent for Processing)

ApplicantStatus-Scrubbed.xls
mabehrAsked:
Who is Participating?

Improve company productivity with a Business Account.Sign Up

x
 
Rgonzo1971Connect With a Mentor Commented:
Hi,

I suppose you are talking of this part of the code ( see my addition at line 6

    If Range("N" & Target.Row) <> "" And _
        Range("K" & Target.Row) <> "" Then
        If MsgBox("Reply Mail for " & Cells(Target.Row, "C") & ", " & Cells(Target.Row, "B") & " as USD amount entered ?", vbQuestion + vbYesNo, "Send Email") = vbYes Then
            fName = CreateNewCardLoad(Range(Cells(Target.Row, "A"), Cells(Target.Row, "T")))
            SendEmail Range(Cells(Target.Row, "A"), Cells(Target.Row, "T")), Cells(Target.Row, "O"), fName
            Cells(Target.Row, "P") = Date ' my Addition
            Exit Sub
        End If
    End If

Open in new window

Regards
0
 
mabehrAuthor Commented:
Thanks, Rgonzo1971. I'll be back in the office later today and will try it out then.
0
 
mabehrAuthor Commented:
Worked perfectly, Rgonzo1971. Thank you.

Are you interested in solving another situation I have?
0
Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

All Courses

From novice to tech pro — start learning today.