Message box for new messages

  • Thread starter Thread starter Guest
  • Start date Start date
G

Guest

Dear Experts,

I want to allow outlook to view a message box on the screen whenever I
receive an e-mail from specified user. For example (I want a message to be
displayed whenever “Anne †sent an e-mail)
This will help me to know that Anne sent me an e-mail even if I’m working
with another program.
Sp can I have a Visual basic script to do that
Hello there,

Actually I made a rule in Outlook 2003 , but is there any way to
implement this so that message appear in any Microsot office program not
just when I open Outlook so that this alert for new email messages appear in
any other program?
Thank you
 
Hi Tahani,

you could use an UserForm instead, because a MsgBox would block OL until
you click the OK button. A proper place for checking incoming mails
would be the ItemAdd event of the Inbox Items.

For receiving mails you need to have OL opened. If OL displays the
UserForm you would see that on the screen - whether you´re actually
working in OL, Excel, or any other programm.
 
Thanks alot

Michael Bauer said:
Hi Tahani,

you could use an UserForm instead, because a MsgBox would block OL until
you click the OK button. A proper place for checking incoming mails
would be the ItemAdd event of the Inbox Items.

For receiving mails you need to have OL opened. If OL displays the
UserForm you would see that on the screen - whether you´re actually
working in OL, Excel, or any other programm.
 
Hello there Michael,
Would you be nice enough to help me writing this code? coz actually I'm new
into VBA programming.
Thanks in advance for ay help you could provide
 
Hi Tahani,

helping: with pleasure, writing: no.

What do you have so far and where is your problem?
 
well,
As I said I'm still a biggener into VBA, as I went through the VB editor in
Outlook , inserted a new user form and I got stuck till that .

Thanks anyway
 
Hi Tahani,

first please take a look in the object browser (F2). Switch from <All
Libraries> to Outlook and search the ItemAdd event for the Items class.
Press F1 for help on this and you will get a code sample, too. This
event can tell you if an item is added to a folder.

In this event procedure you can call your UserForm, e.g.

Dim oFrm as UserForm
Set oFrm=New UserForm1 'Name of your UserForm
oFrm.Show

To the UserForm you can add a label for displaying some infos and an
OK-Button. The controls are available via the toolbox.
 
Thanks again

Michael Bauer said:
Hi Tahani,

first please take a look in the object browser (F2). Switch from <All
Libraries> to Outlook and search the ItemAdd event for the Items class.
Press F1 for help on this and you will get a code sample, too. This
event can tell you if an item is added to a folder.

In this event procedure you can call your UserForm, e.g.

Dim oFrm as UserForm
Set oFrm=New UserForm1 'Name of your UserForm
oFrm.Show

To the UserForm you can add a label for displaying some infos and an
OK-Button. The controls are available via the toolbox.
 
Back
Top