|
|
#2
08-20-2009, 06:21 PM
|
|||
|
|||
Found a solution.
Code:
Sub autoopen()
Application.CommandBars("Edit").Controls.Item("Paste").OnAction = "catcher1"
Application.CommandBars("Edit").Controls.Item("Paste Special...").OnAction = "catcher2"
End Sub
Public Sub catcher1()
SendKeys "^{v}"
End Sub
Public Sub catcher2()
MsgBox ("This option has been disabled by the administrator. Please use the shortcut keys 'ctrl+v' to paste.")
End Sub
|
| Tags |
| activex, inline shapes, textbox |
| Thread Tools | |
| Display Modes | |
|
|
Similar Threads
|
||||
| Thread | Thread Starter | Forum | Replies | Last Post |
| PA To the CEO Can't Edit Private Appointments Outlook 2007 | Neil Parry | Outlook | 0 | 03-29-2009 10:05 PM |
| How can I edit a form | Bushy | Word | 0 | 03-17-2009 01:09 PM |
| Set text in edit control on inspector window indicating time Outlook 2007 | saniltalathi | Outlook | 0 | 02-20-2009 08:43 AM |
| Templates: automatic text generation from Rich Text content control | Chickenmunga | Word | 0 | 10-01-2008 11:16 AM |
 paste formated text from Word to only one Excel cell
|
heron | Word | 1 | 12-06-2005 02:37 AM |
Windows XP 
Office 2003
Threaded Mode