How to add button on Mail editor which is not outlook.??

Gaurav Khare · Joined: 13 Aug 2007 Posts: 3

Hi all
Now the problem is when I click on New mail message button it opens the
microsoft word editor to send a new mail.Now i want to add a button "Send and
add" but how to do so when i am creating a addin for Outlook but this is the
part of ms word and not outlook...
please help
Looking forward ....
--
Gaurav khare
software engineer
Ots Solutions Pvt Ltd

Archived from group: microsoft>public>office>developer>outlook>vba

Ken Slovak - [MVP - Outlo · Joined: 12 Aug 2007 Posts: 405

If Inspector.IsWordMail Then

use the Inspector.WordEditor object which is the WordMail document. You can
only add buttons there to the main menu or the Standard toolbar, not to any
toolbars you might have added or any of the Outlook toolbars.

--
Ken Slovak
[MVP - Outlook]
http://www.slovaktech.com
Author: Absolute Beginner's Guide to Microsoft Office Outlook 2003
Reminder Manager, Extended Reminders, Attachment Options
http://www.slovaktech.com/products.htm

"Gaurav Khare" wrote in message @microsoft.com...
> Hi all
> Now the problem is when I click on New mail message button it opens the
> microsoft word editor to send a new mail.Now i want to add a button "Send
> and
> add" but how to do so when i am creating a addin for Outlook but this is
> the
> part of ms word and not outlook...
> please help
> Looking forward ....
> --
> Gaurav khare
> software engineer
> Ots Solutions Pvt Ltd

Gaurav Khare · Joined: 13 Aug 2007 Posts: 3

Thanks Ken ,
I will try this out and let you if any problems comes.........
--
Gaurav khare
software engineer
Ots Solutions Pvt Ltd

"Ken Slovak - [MVP - Outlook]" wrote:

> If Inspector.IsWordMail Then
>
> use the Inspector.WordEditor object which is the WordMail document. You can
> only add buttons there to the main menu or the Standard toolbar, not to any
> toolbars you might have added or any of the Outlook toolbars.
>
> --
> Ken Slovak
> [MVP - Outlook]
> http://www.slovaktech.com
> Author: Absolute Beginner's Guide to Microsoft Office Outlook 2003
> Reminder Manager, Extended Reminders, Attachment Options
> http://www.slovaktech.com/products.htm
>
>
> "Gaurav Khare" wrote in message
> @microsoft.com...
> > Hi all
> > Now the problem is when I click on New mail message button it opens the
> > microsoft word editor to send a new mail.Now i want to add a button "Send
> > and
> > add" but how to do so when i am creating a addin for Outlook but this is
> > the
> > part of ms word and not outlook...
> > please help
> > Looking forward ....
> > --
> > Gaurav khare
> > software engineer
> > Ots Solutions Pvt Ltd
>
>

Gaurav Khare · Joined: 13 Aug 2007 Posts: 3

Hi ken,
I tried using your method and it worked but there are two problems ..
1. when using Word Editor--> my button's click event is not firing. I tried
to catch its click event like other custom buttons that i have added on
outlook but it did'nt work.
2. when using HTML Editor--> I tried to create button like as in word editor
and like those in outlook but in both cases the button coud not get added.
When adding like word editor it gives "obects property not supported".
I used the following code......
Private WithEvents osendButton As Office.CommandBarButton
If Inspector.IsWordMail Then
Set objEditor = Inspector.WordEditor
Else
Set objEditor = Inspector.HTMLEditor
End If
If Not objEditor.CommandBars("Standard").Controls.Item(1).Caption =
"Send and Add to Intelligent" Then
Set osendButton =
objEditor.CommandBars("Standard").Controls.Add(Temporary:=True, Before:=1)
osendButton.Caption = "Send and Add to Intelligent"
osendButton.Visible = True
osendButton.DescriptionText = "Send and Add to Intelligent"
osendButton.ToolTipText = "Send and to Intelligent office also"
osendButton.Style = msoButtonCaption
osendButton.BuiltInFace = True
osendButton.Visible = True
End if

This worked well when case is "Word Editor" but its click event does not
fired.
for its click event i wrote.......

Private Sub osendButton_Click(ByVal Ctrl As Office.CommandBarButton,
CancelDefault As Boolean)
MsgBox ("Going to Intelligent.....")
End Sub

But when case is "HTML Editor" it gives the following error....

"Objects property not supported..."

I also tried using this code for HTML Editor...But it also didnt work....
Private WithEvents moOL As Outlook.Application
Set oCBs = moOL.ActiveInspector.CommandBars
Set oMenuBar = oCBs.ActiveMenuBar
oMenuBar.Visible = True
Set osendButton = oMenuBar.Controls.Add(msoControlButton, , , , True)
osendButton.Caption = "Add to Intelligent Office"
osendButton.Enabled = False
osendButton.Visible = True

please help me for both cases...
1. "Click event for Button in word editor"
2. Adding button and its click event in HTML editor
Looking forward from your side.....

--
Gaurav khare
software engineer
Ots Solutions Pvt Ltd

"Ken Slovak - [MVP - Outlook]" wrote:

> If Inspector.IsWordMail Then
>
> use the Inspector.WordEditor object which is the WordMail document. You can
> only add buttons there to the main menu or the Standard toolbar, not to any
> toolbars you might have added or any of the Outlook toolbars.
>
> --
> Ken Slovak
> [MVP - Outlook]
> http://www.slovaktech.com
> Author: Absolute Beginner's Guide to Microsoft Office Outlook 2003
> Reminder Manager, Extended Reminders, Attachment Options
> http://www.slovaktech.com/products.htm
>
>
> "Gaurav Khare" wrote in message
> @microsoft.com...
> > Hi all
> > Now the problem is when I click on New mail message button it opens the
> > microsoft word editor to send a new mail.Now i want to add a button "Send
> > and
> > add" but how to do so when i am creating a addin for Outlook but this is
> > the
> > part of ms word and not outlook...
> > please help
> > Looking forward ....
> > --
> > Gaurav khare
> > software engineer
> > Ots Solutions Pvt Ltd
>
>

Ken Slovak - [MVP - Outlo · Joined: 12 Aug 2007 Posts: 405

You can't just assume the user is using the HTML editor if they're not using
Word, they might be using plain text or RTF as their defaults. You should
check the EditorType property.

Also, for a button in an addin you will want to use the ProgID you get in
the On_Connection event handler to set up the OnAction property for your
button:
osendButton.OnAction = "!"

See if that helps.

--
Ken Slovak
[MVP - Outlook]
http://www.slovaktech.com
Author: Absolute Beginner's Guide to Microsoft Office Outlook 2003
Reminder Manager, Extended Reminders, Attachment Options
http://www.slovaktech.com/products.htm

"Gaurav Khare" wrote in message @microsoft.com...
> Hi ken,
> I tried using your method and it worked but there are two problems ..
> 1. when using Word Editor--> my button's click event is not firing. I
> tried
> to catch its click event like other custom buttons that i have added on
> outlook but it did'nt work.
> 2. when using HTML Editor--> I tried to create button like as in word
> editor
> and like those in outlook but in both cases the button coud not get added.
> When adding like word editor it gives "obects property not supported".
> I used the following code......
> Private WithEvents osendButton As Office.CommandBarButton
> If Inspector.IsWordMail Then
> Set objEditor = Inspector.WordEditor
> Else
> Set objEditor = Inspector.HTMLEditor
> End If
> If Not objEditor.CommandBars("Standard").Controls.Item(1).Caption =
> "Send and Add to Intelligent" Then
> Set osendButton =
> objEditor.CommandBars("Standard").Controls.Add(Temporary:=True, Before:=1)
> osendButton.Caption = "Send and Add to Intelligent"
> osendButton.Visible = True
> osendButton.DescriptionText = "Send and Add to Intelligent"
> osendButton.ToolTipText = "Send and to Intelligent office also"
> osendButton.Style = msoButtonCaption
> osendButton.BuiltInFace = True
> osendButton.Visible = True
> End if
>
> This worked well when case is "Word Editor" but its click event does not
> fired.
> for its click event i wrote.......
>
> Private Sub osendButton_Click(ByVal Ctrl As Office.CommandBarButton,
> CancelDefault As Boolean)
> MsgBox ("Going to Intelligent.....")
> End Sub
>
> But when case is "HTML Editor" it gives the following error....
>
> "Objects property not supported..."
>
> I also tried using this code for HTML Editor...But it also didnt work....
> Private WithEvents moOL As Outlook.Application
> Set oCBs = moOL.ActiveInspector.CommandBars
> Set oMenuBar = oCBs.ActiveMenuBar
> oMenuBar.Visible = True
> Set osendButton = oMenuBar.Controls.Add(msoControlButton, , , , True)
> osendButton.Caption = "Add to Intelligent Office"
> osendButton.Enabled = False
> osendButton.Visible = True
>
>
> please help me for both cases...
> 1. "Click event for Button in word editor"
> 2. Adding button and its click event in HTML editor
> Looking forward from your side.....
>
>
>
> --
> Gaurav khare
> software engineer
> Ots Solutions Pvt Ltd

Ashok · Joined: 12 Aug 2007 Posts: 15

Hi,

I'm having similar kind of pblm. If I add any button to the outlook word
editor, then i open another word instance, the new word instance shows the
custom command bar which I've added to outlook word editor. But it shdn't
appear in the new word instance.

Could you pls advice me to achieve the same?

Thanks & Regards
Ashok

"Ken Slovak - [MVP - Outlook]" wrote:

> You can't just assume the user is using the HTML editor if they're not using
> Word, they might be using plain text or RTF as their defaults. You should
> check the EditorType property.
>
> Also, for a button in an addin you will want to use the ProgID you get in
> the On_Connection event handler to set up the OnAction property for your
> button:
> osendButton.OnAction = "!"
>
> See if that helps.
>
> --
> Ken Slovak
> [MVP - Outlook]
> http://www.slovaktech.com
> Author: Absolute Beginner's Guide to Microsoft Office Outlook 2003
> Reminder Manager, Extended Reminders, Attachment Options
> http://www.slovaktech.com/products.htm
>
>
> "Gaurav Khare" wrote in message
> @microsoft.com...
> > Hi ken,
> > I tried using your method and it worked but there are two problems ..
> > 1. when using Word Editor--> my button's click event is not firing. I
> > tried
> > to catch its click event like other custom buttons that i have added on
> > outlook but it did'nt work.
> > 2. when using HTML Editor--> I tried to create button like as in word
> > editor
> > and like those in outlook but in both cases the button coud not get added.
> > When adding like word editor it gives "obects property not supported".
> > I used the following code......
> > Private WithEvents osendButton As Office.CommandBarButton
> > If Inspector.IsWordMail Then
> > Set objEditor = Inspector.WordEditor
> > Else
> > Set objEditor = Inspector.HTMLEditor
> > End If
> > If Not objEditor.CommandBars("Standard").Controls.Item(1).Caption =
> > "Send and Add to Intelligent" Then
> > Set osendButton =
> > objEditor.CommandBars("Standard").Controls.Add(Temporary:=True, Before:=1)
> > osendButton.Caption = "Send and Add to Intelligent"
> > osendButton.Visible = True
> > osendButton.DescriptionText = "Send and Add to Intelligent"
> > osendButton.ToolTipText = "Send and to Intelligent office also"
> > osendButton.Style = msoButtonCaption
> > osendButton.BuiltInFace = True
> > osendButton.Visible = True
> > End if
> >
> > This worked well when case is "Word Editor" but its click event does not
> > fired.
> > for its click event i wrote.......
> >
> > Private Sub osendButton_Click(ByVal Ctrl As Office.CommandBarButton,
> > CancelDefault As Boolean)
> > MsgBox ("Going to Intelligent.....")
> > End Sub
> >
> > But when case is "HTML Editor" it gives the following error....
> >
> > "Objects property not supported..."
> >
> > I also tried using this code for HTML Editor...But it also didnt work....
> > Private WithEvents moOL As Outlook.Application
> > Set oCBs = moOL.ActiveInspector.CommandBars
> > Set oMenuBar = oCBs.ActiveMenuBar
> > oMenuBar.Visible = True
> > Set osendButton = oMenuBar.Controls.Add(msoControlButton, , , , True)
> > osendButton.Caption = "Add to Intelligent Office"
> > osendButton.Enabled = False
> > osendButton.Visible = True
> >
> >
> > please help me for both cases...
> > 1. "Click event for Button in word editor"
> > 2. Adding button and its click event in HTML editor
> > Looking forward from your side.....
> >
> >
> >
> > --
> > Gaurav khare
> > software engineer
> > Ots Solutions Pvt Ltd
>
>

Ken Slovak - [MVP - Outlo · Joined: 12 Aug 2007 Posts: 405

If you add user interface to WordMail it will be there unless you handle the
Word.WindowActivate event and check for window.EnvelopeVisible. If true it's
a mail item, if false it's a Word item. You can use that to disable/enable
your UI or to make it visible/invisible.

You also have to be careful in how you add your UI so it doesn't show up in
Normal.dot and be there in all Word documents even if Outlook isn't running.
You have to set the CustomizationContext where you want the UI created and
set CustomizationContext.Saved = True after you add and delete your UI so
the user doesn't get prompted to save Normal.dot.

You may also have to account for multiple open WordMail Inspectors and use
unique Tag properties for each piece of UI you create so you can identify
which instance of your UI to enable/disable. Seeing multiple instances of
your UI is as bad as not seeing it when appropriate or seeing it when not
appropriate.

--
Ken Slovak
[MVP - Outlook]
http://www.slovaktech.com
Author: Professional Programming Outlook 2007
Reminder Manager, Extended Reminders, Attachment Options
http://www.slovaktech.com/products.htm

"Ashok" wrote in message @microsoft.com...
> Hi,
>
> I'm having similar kind of pblm. If I add any button to the outlook word
> editor, then i open another word instance, the new word instance shows the
> custom command bar which I've added to outlook word editor. But it shdn't
> appear in the new word instance.
>
> Could you pls advice me to achieve the same?
>
> Thanks & Regards
> Ashok

Ashok · Joined: 12 Aug 2007 Posts: 15

Hi,

I am fine with your suggestion. One more thing I want to ensure, is it
possible to add my cmdbarctrl previous to send button?. I tried to observe
the commandbar, but I could not, even I can not move the commandbar out of
that area.

Could you pls suggest me to achieve the same?

Regards
Ashok

"Ken Slovak - [MVP - Outlook]" wrote:

> If you add user interface to WordMail it will be there unless you handle the
> Word.WindowActivate event and check for window.EnvelopeVisible. If true it's
> a mail item, if false it's a Word item. You can use that to disable/enable
> your UI or to make it visible/invisible.
>
> You also have to be careful in how you add your UI so it doesn't show up in
> Normal.dot and be there in all Word documents even if Outlook isn't running.
> You have to set the CustomizationContext where you want the UI created and
> set CustomizationContext.Saved = True after you add and delete your UI so
> the user doesn't get prompted to save Normal.dot.
>
> You may also have to account for multiple open WordMail Inspectors and use
> unique Tag properties for each piece of UI you create so you can identify
> which instance of your UI to enable/disable. Seeing multiple instances of
> your UI is as bad as not seeing it when appropriate or seeing it when not
> appropriate.
>
> --
> Ken Slovak
> [MVP - Outlook]
> http://www.slovaktech.com
> Author: Professional Programming Outlook 2007
> Reminder Manager, Extended Reminders, Attachment Options
> http://www.slovaktech.com/products.htm
>
>
> "Ashok" wrote in message
> @microsoft.com...
> > Hi,
> >
> > I'm having similar kind of pblm. If I add any button to the outlook word
> > editor, then i open another word instance, the new word instance shows the
> > custom command bar which I've added to outlook word editor. But it shdn't
> > appear in the new word instance.
> >
> > Could you pls advice me to achieve the same?
> >
> > Thanks & Regards
> > Ashok
>
>

Ken Slovak - [MVP - Outlo · Joined: 12 Aug 2007 Posts: 405

With the Outlook editor you can access and customize the Standard toolbar
and add a control before Send or anywhere else in that toolbar. With
WordMail you can't do that, you would have to add your control to a custom
toolbar you create instead of trying to modify the Standard toolbar.

--
Ken Slovak
[MVP - Outlook]
http://www.slovaktech.com
Author: Professional Programming Outlook 2007
Reminder Manager, Extended Reminders, Attachment Options
http://www.slovaktech.com/products.htm

"Ashok" wrote in message @microsoft.com...
> Hi,
>
> I am fine with your suggestion. One more thing I want to ensure, is it
> possible to add my cmdbarctrl previous to send button?. I tried to observe
> the commandbar, but I could not, even I can not move the commandbar out of
> that area.
>
> Could you pls suggest me to achieve the same?
>
> Regards
> Ashok

Ashok · Joined: 12 Aug 2007 Posts: 15

Hi Ken,

I noticed that in word application, user can make visible/invisible the
envelope dialog by clicking the email button as well in outlook word editor
that time my logic is failing. So, how can i proceed further? Is there any
other property to identify the window is from outlook or word?

Could you please guide me solve this issue?

"Ken Slovak - [MVP - Outlook]" wrote:

> With the Outlook editor you can access and customize the Standard toolbar
> and add a control before Send or anywhere else in that toolbar. With
> WordMail you can't do that, you would have to add your control to a custom
> toolbar you create instead of trying to modify the Standard toolbar.
>
> --
> Ken Slovak
> [MVP - Outlook]
> http://www.slovaktech.com
> Author: Professional Programming Outlook 2007
> Reminder Manager, Extended Reminders, Attachment Options
> http://www.slovaktech.com/products.htm
>
>
> "Ashok" wrote in message
> @microsoft.com...
> > Hi,
> >
> > I am fine with your suggestion. One more thing I want to ensure, is it
> > possible to add my cmdbarctrl previous to send button?. I tried to observe
> > the commandbar, but I could not, even I can not move the commandbar out of
> > that area.
> >
> > Could you pls suggest me to achieve the same?
> >
> > Regards
> > Ashok
>
>

Ken Slovak - [MVP - Outlo · Joined: 12 Aug 2007 Posts: 405

Testing for Envelope.Visible is the only way I know of.

--
Ken Slovak
[MVP - Outlook]
http://www.slovaktech.com
Author: Professional Programming Outlook 2007
Reminder Manager, Extended Reminders, Attachment Options
http://www.slovaktech.com/products.htm

"Ashok" wrote in message @microsoft.com...
> Hi Ken,
>
> I noticed that in word application, user can make visible/invisible the
> envelope dialog by clicking the email button as well in outlook word
> editor
> that time my logic is failing. So, how can i proceed further? Is there any
> other property to identify the window is from outlook or word?
>
> Could you please guide me solve this issue?

Ashok · Joined: 12 Aug 2007 Posts: 15

Hi Ken,

Can I use the Doc.Kind property instead of wn.envlopevisible? I hope it does
that. Guide me.

Thanks & Regards
Ashok

"Ken Slovak - [MVP - Outlook]" wrote:

> Testing for Envelope.Visible is the only way I know of.
>
> --
> Ken Slovak
> [MVP - Outlook]
> http://www.slovaktech.com
> Author: Professional Programming Outlook 2007
> Reminder Manager, Extended Reminders, Attachment Options
> http://www.slovaktech.com/products.htm
>
>
> "Ashok" wrote in message
> @microsoft.com...
> > Hi Ken,
> >
> > I noticed that in word application, user can make visible/invisible the
> > envelope dialog by clicking the email button as well in outlook word
> > editor
> > that time my logic is failing. So, how can i proceed further? Is there any
> > other property to identify the window is from outlook or word?
> >
> > Could you please guide me solve this issue?
>
>

Ken Slovak - [MVP - Outlo · Joined: 12 Aug 2007 Posts: 405

Try it and see if it works.

--
Ken Slovak
[MVP - Outlook]
http://www.slovaktech.com
Author: Professional Programming Outlook 2007
Reminder Manager, Extended Reminders, Attachment Options
http://www.slovaktech.com/products.htm

"Ashok" wrote in message @microsoft.com...
> Hi Ken,
>
> Can I use the Doc.Kind property instead of wn.envlopevisible? I hope it
> does
> that. Guide me.
>
> Thanks & Regards
> Ashok

Ashok · Joined: 12 Aug 2007 Posts: 15

Hi Ken,

I want to add my custom button to 'Outlook 2007' new mail editor which is
developed in VB 6.0. could you pls guide me to accomplish the same with out
changing my project ref?

pls guide me to proceed further.

Regards
Ashok

"Ashok" wrote:

> Hi Ken,
>
> Can I use the Doc.Kind property instead of wn.envlopevisible? I hope it does
> that. Guide me.
>
> Thanks & Regards
> Ashok
>
> "Ken Slovak - [MVP - Outlook]" wrote:
>
> > Testing for Envelope.Visible is the only way I know of.
> >
> > --
> > Ken Slovak
> > [MVP - Outlook]
> > http://www.slovaktech.com
> > Author: Professional Programming Outlook 2007
> > Reminder Manager, Extended Reminders, Attachment Options
> > http://www.slovaktech.com/products.htm
> >
> >
> > "Ashok" wrote in message
> > @microsoft.com...
> > > Hi Ken,
> > >
> > > I noticed that in word application, user can make visible/invisible the
> > > envelope dialog by clicking the email button as well in outlook word
> > > editor
> > > that time my logic is failing. So, how can i proceed further? Is there any
> > > other property to identify the window is from outlook or word?
> > >
> > > Could you please guide me solve this issue?
> >
> >

Ken Slovak - [MVP - Outlo · Joined: 12 Aug 2007 Posts: 405

If you are trying to add UI to an Outlook 2007 Inspector you have 2 options.

First, you can just do what you are doing and let the CommandBars UI get
stuffed in the Add-Ins tab, where each button you create would be displayed
as a ribbon control.

The alternative is to actually code to the ribbon for your UI if the Outlook
version is 12.

To do that while still using references to the Office and Outlook 2003 or
earlier tlb's you would need an extraction of the interfaces for the ribbon
from the Office 2007 tlb and to reference that ribbon tlb for your ribbon
work. The Implementation of the ribbon interface would have to be placed in
the same class as the one that handles the IDTExtensibility2 interface and
your ribbon callbacks would be in that class also.

Of course you'd need to create the ribbon UI using XML as usual and supply
any ribbon images using IPictureDisp as usual, etc. Dennis Wallentin
(XL-Dennis) has an extraction of the ribbon interface from the Office 2007
tlb already so you'd just need to download that and work with that as your
ribbon reference. Take a look at his articles starting at
http://xldennis.wordpress.com/2006/12/12/creating-a-standalone-type-library-for-iribbonextensibility/.

--
Ken Slovak
[MVP - Outlook]
http://www.slovaktech.com
Author: Professional Programming Outlook 2007
Reminder Manager, Extended Reminders, Attachment Options
http://www.slovaktech.com/products.htm

"Ashok" wrote in message @microsoft.com...
> Hi Ken,
>
> I want to add my custom button to 'Outlook 2007' new mail editor which is
> developed in VB 6.0. could you pls guide me to accomplish the same with
> out
> changing my project ref?
>
> pls guide me to proceed further.
>
> Regards
> Ashok

Outlook XP - Copy bitmap onto button. Hi there, In regards with Microsoft Outlook XP. Created a button on the Standard Toolbar and copied a bitmap on to the button. When Outlook XP loads, the button is created, but no bitmap. When you move mouse pointer over the button the bitmap is shown, mo

Adding CommandBars with Word as Editor I have VBA code that correctly adds a Control to a CommandBar in the email read form. However, when Word is selected as the email client editor the Control does not get added, although the code does execute. In looking into it I see that when Word is the

How do I get click-event on form button working Hi I designed some olforms but don't want them to execute VBS-Code. I did develope vba-code placed as module ... but don't know how to get form-button (for example Togglebutton) working ... I tried *** Dim As ToggleButton .... Set tglAppoin

Outlook - delivering mail icon When I click on Send and Receive in Outlook 2000, I get a box that shows a piece of mail going back and forth. My wife has Outlook 2000 also but when she clicks Send and Receive, she gets a box that shows details of incoming and delivering mail - i.e. ho

Outlook 2002 (SP 2) Mail Item SaveAs problem We have developed a com add in for MS Outlook, enabling our users to archive mails directly to our IXOS document management server. As shown below in the code we save mails as .htm files in a first step. Running the code produces the following: By default