On Feb 27, 7:25 am, "Michael Bauer [MVP - Outlook]" <
[email protected]>
wrote:
As I understand, you want one button for one e-mail with five addresses.
That would be:
Public Sub EMail1()
Dim Mail as Outlook.MailItem
Set Mail=Application.CreateItem(olMailItem)
Mail.Recipients.Add "...."
Mail.Recipients.Add "...."
Mail.Recipients.Add "...."
Mail.Recipients.Add "...."
Mail.Recipients.Add "...."
Mail.Display
End Sub
--
Viele Gruesse / Best regards
Michael Bauer - MVP Outlook
Keep your Outlook categories organized!
http://www.shareit.com/product.html?productid=300120654&languageid=1
(German:
http://www.VBOffice.net/product.html?pub=6)
Am 26 Feb 2007 13:49:16 -0800 schrieb dadopodsem:
Michael, it does not work. I am dupe.
It should look like this?
Public Sub EMail1()
Recipients.Add "(e-mail address removed)"
End Sub
Public Sub EMail2()
Recipients.Add "(e-mail address removed)"
End Sub
On Feb 26, 12:40 pm, "Michael Bauer [MVP - Outlook]" <
[email protected]>
wrote:
Martin, no prob at all - simply call Recipients.Add for each address.
--
Viele Gruesse / Best regards
Michael Bauer - MVP Outlook
Keep your Outlook categories organized!
http://www.shareit.com/product.html?productid=300120654&languageid=1
(German:
http://www.VBOffice.net/product.html?pub=6)
Am 26 Feb 2007 02:58:42 -0800 schrieb dadopodsem:
Mr Bauer, thank you very much. It really works!!! I have already made
some macro buttons with the script you specified below.
I wanted to change a little bit this way.
1) I would open a new message.
2) Into this one message into the "To:" address line I would like to
insert five different email addresses. I mean that there is no need to
open a new message each time I press the button. Only five different
email addresses would be inserted into the same line.
Say, I would have 20 users and I do not want to create mailing list
because there is a lot of combinations. I also do not want to use
aliases for so many users since I cannot remember them all.
So here the solution would be very fine through the macro buttons (as
described above).
Let me thank you once again for your kind and excellent assistance.
Best regards,
Martin -- Slovak Republic
On Feb 26, 6:34 am, "Michael Bauer [MVP - Outlook]" <
[email protected]>
wrote:
This creates a new e-mail with one recipient:
Public Sub EMail1()
Dim Mail as Outlook.MailItem
Set Mail=Application.CreateItem(olMailItem)
Mail.Recipients.Add "...."
Mail.Display
End Sub
--
Viele Gruesse / Best regards
Michael Bauer - MVP Outlook
Keep your Outlook categories organized!
http://www.shareit.com/product.html?productid=300120654&languageid=1
(German:
http://www.VBOffice.net/product.html?pub=6)
Am 25 Feb 2007 02:04:35 -0800 schrieb dadopodsem:
Hello,
can anyone help me how to insert an email adress into a new message
via a "macro button"?
I would like to set up 5 different macro buttons for 5 most frequent
people. These macro buttons should be assigned with the respective
email address and by pressing the button, an email address should be
inserted in the message line.
Thank you very much.
Martin- Hide quoted text -
- Show quoted text -- Hide quoted text -
- Show quoted text -
Hi Michael,
no.
I want one button for one e-mail address. I do not want a button for
creating an email message.
1) I will open a new message.
2) I will have 20 macro buttons created at the tools panel.
3) I would like to freely combine email recipients by pressing the
buttons. So this is not so about the creating a message by button but
about creating the macro buttons for email addreses.
I just want to press button 1 and the email address of Mrs Robinson
(not email message) will appear in the To: line
(
[email protected]).
Then I press button 2 and the email address of Mr Robinson (next to
Mrs Robinson) will appear (
[email protected])
So the result should look like this: ONe email message: To:
(e-mail address removed); (e-mail address removed)
Thank you.
