View Single Post
  #3  
Old February 12th 08, 04:47 PM posted to microsoft.public.outlook.program_vba
Cerveja
external usenet poster
 
Posts: 2
Default Programmatic plain-text insert

Awesome. Thanks Eric. I have been hitting "ALT + E + S" to trigger Paste
special as with Word and it sends my incomplete email. Thanks.

"Eric Legault [MVP - Outlook]" wrote:

You can only go so far to automate selecting the Paste Special menu item.
You can execute it as below, but you cannot control what happens with the
subsequent dialog that provides the paste options.

Dim objCBs As CommandBars
Dim objCBC As CommandBarControl
Dim objCB As CommandBar


Set objCBs = Application.ActiveInspector.CommandBars
Set objCB = objCBs("Menu Bar")
Set objCBC = objCB.FindControl(, 30003) 'Edit menu

For Each objCBC In objCBC.Controls
If objCBC.ID = 755 Then 'Paste Special
objCBC.Execute
Exit Sub
End If
Next

--
Eric Legault - Outlook MVP, MCDBA, MCTS (SharePoint programming, etc.)
Try Picture Attachments Wizard for Outlook:
http://www.collaborativeinnovations.ca
Blog: http://blogs.officezealot.com/legault/


"BrianWren" wrote:

I would like to create a macro, and put it on a toolbar button, that invoked
the behavior of EditPaste Special...plain text.

How do I insert in an email that is open?

Can macros be assigned to buttons on a toolbar?

--
There are exactly 10 kinds of people: Those who do- and those who don’t
understand binary.

Ads