Programmatic plain-text insert

  • Thread starter Thread starter BrianWren
  • Start date Start date
B

BrianWren

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

How do I insert in an email that is open?

Can macros be assigned to buttons on a toolbar?
 
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
 
Awesome. Thanks Eric. I have been hitting "ALT + E + S" to trigger Paste
special as with Word and it sends my incomplete email. Thanks.
 
Back
Top