Is this feasible?

  • Thread starter Thread starter JIMC5499
  • Start date Start date
J

JIMC5499

I would like to embed a macro into an e-mail. What I need is the ability to
assign a number to a string value and then use that string as a file name in
an attachment path and a link to a folder. I also need to be able to put
three buttons into the e-mail. They would be "Approved", "Not Approved" and
"No Action Required". The selection of one of these buttons would send a
canned reply E-mail. Can this be done in Access 2003?
 
JIMC5499 said:
I would like to embed a macro into an e-mail. What I need is the ability to
assign a number to a string value and then use that string as a file name in
an attachment path and a link to a folder. I also need to be able to put
three buttons into the e-mail. They would be "Approved", "Not Approved" and
"No Action Required". The selection of one of these buttons would send a
canned reply E-mail. Can this be done in Outlook 2003?
 
If I understand you correctly, you want your email to contain a link
to a file?

To create the email, you need code like this:

Dim myOlApp As Object
Dim myItem As Object
Set myOlApp = CreateObject("Outlook.Application")
Set myItem = myOlApp.CreateItem(0)

I assume by "buttons" you mean voting buttons. See
http://www.codeforexcelandoutlook.c...unting-voting-responses-in-outlook-using-vba/
for putting the voting buttons on the email. When they are clicked, a
voting response is sent. I don't believe you can customize the reply
at all (other than seeing the custom voting options you set up when
sending the message).

See http://www.codeforexcelandoutlook.com/blog/2008/10/html-link-building-using-excel/
for sample code that shows you how to format the links in the email
body.

As far as "What I need is the ability to assign a number to a string
value and then use that string as a file name in an attachment path
and a link to a folder." I'm not clear what that means. You can always
append a number to a string, as long as you convert it to a string
first. For example

Dim MyString As String
MyString = "Hello World" & "3"
MsgBox MyString

--JP
 
Back
Top