[mso] Re: Office Advice

  • From: Alejandro Velázquez <alejandro.velazquez@xxxxxxxxxxxxxx>
  • To: <mso@xxxxxxxxxxxxx>
  • Date: Thu, 28 Aug 2003 08:36:14 -0500

Hi Lexi,

Is quite simple, you just record an excel macro with all the steps you
need to finish a given Excel sheet, on the VBA code that was generated
you should edit it and add the following:

At the beginning of your macro you define an array which will contain
all the people which will receive the mail:

Dim destinat(18) As Variant

Next, you fill the array:

    destinat(1) =3D "John Wayne"
    destinat(2) =3D "Frank Williams"
    destinat(3) =3D "Lizeth Ben=EDtez <lizethmty@xxxxxxxxxxxxxx>"
    destinat(4) =3D "Luz Vel=E1zquez <vlazquezl@xxxxxxxxxxx>"
    destinat(5) =3D "Alex Brown"
    destinat(6) =3D "other 1"
    destinat(7) =3D "other 2"
    destinat(8) =3D ""
    destinat(9) =3D ""
    destinat(10) =3D ""
    destinat(11) =3D ""
    destinat(12) =3D ""
    destinat(13) =3D ""
    destinat(14) =3D ""
    destinat(15) =3D ""
    destinat(16) =3D ""
    destinat(17) =3D ""
    destinat(18) =3D ""
=20
as many users as you defined in destinat


Then, just send the mail, with the active Excel workbook attached,

ActiveWorkbook.SendMail Recipients:=3Ddestinat, Subject:=3D"An=E1lisis
Comparativo de Ventas al " & fecha
   =20
The only problem with ActiveWorkbook.sendmail is that you can not add
text in the body of the message.


Hope this Hill be useful for you,

Best regards.

=20


Alejandro Vel=E1zquez H.
Sistemas Carlton M=E9xico
*alejandro.velazquez@xxxxxxxxxxxxxx
( 5656 2472 & 5607 2755 ext 152
=20
=20

-----Mensaje original-----
De: mso-bounce@xxxxxxxxxxxxx [mailto:mso-bounce@xxxxxxxxxxxxx] En nombre
de LEXI
Enviado el: Mi=E9rcoles, 27 de Agosto de 2003 10:53 p.m.
Para: mso@xxxxxxxxxxxxx
Asunto: [mso] Re: Office Advice

I didn't know Excel could do this
How do I learn how to have excel send mail when an excel sheet is
edited?
Lexi


At 12:05 PM 8/27/2003, you wrote:
>Hi,
>
>I have an Outlook question; I have a macro in Excel XP which sends a
>daily report to all our managers via Outlook (ActiveWorkbook.sendmail),
>the problem is that when the mail goes I am getting a message that
says:
>
>"A program is trying to send a mail automatically on your behalf, if
>this is unexpected it might be a virus and should select NO"
>
>I have a list of about 20 people and I should click YES 20 times, how
>can I avoid this message?, without disabling the whole Outlook
security.
>
>Also, is there another way to send a mail in an Excel macro not using
>ActiveWorkbook.sendmail?, the problem with ActiveWorkbook.sendmail, is
>that I can not include a body text in my message, just the subject.
>
>Please advice.
>
>Best regards,
>
>
>
>Alejandro Vel=3DE1zquez H.


*************************************************************
You are receiving this mail because you subscribed to mso@xxxxxxxxxxxxx
or MicrosoftOffice@xxxxxxxxxxxxxxxx

To send mail to the group, simply address it to mso@xxxxxxxxxxxxx

To Unsubscribe from this group, send an email to=20
mso-request@xxxxxxxxxxxxx with the word "unsubscribe" (without the
quotes) in the subject line.

Or, visit the group's homepage and use the dropdown menu.  This will
also allow you to change your email settings to digest or vacation (no
mail).
//www.freelists.org/webpage/mso

To be able to use the files section for sharing files with the group,
send a request to mso-moderators@xxxxxxxxxxxxx and you will be sent an
invitation with instructions.  Once you are a member of the files group,
you can go here to upload/download files:

http://www.smartgroups.com/vault/msofiles
*************************************************************

*************************************************************
You are receiving this mail because you subscribed to mso@xxxxxxxxxxxxx or 
MicrosoftOffice@xxxxxxxxxxxxxxxx

To send mail to the group, simply address it to mso@xxxxxxxxxxxxx

To Unsubscribe from this group, send an email to 
mso-request@xxxxxxxxxxxxx with the word "unsubscribe" (without the quotes) in 
the subject line.

Or, visit the group's homepage and use the dropdown menu.  This will also allow 
you to change your email settings to digest or vacation (no mail).
//www.freelists.org/webpage/mso

To be able to use the files section for sharing files with the group, send a 
request to mso-moderators@xxxxxxxxxxxxx and you will be sent an invitation with 
instructions.  Once you are a member of the files group, you can go here to 
upload/download files:
http://www.smartgroups.com/vault/msofiles
*************************************************************

Other related posts: