2012-04-04 10 views

答えて

1

あなたは、私はどちらか試していないWindowBeforeRightClick

Public WithEvents appWord as Word.Application 

Private Sub appWord_WindowBeforeRightClick _ 
(ByVal Sel As Selection, Cancel As Boolean) 
Dim intResponse As Integer 

intResponse = MsgBox("Selection = " & Sel & vbLf & vbLf _ 
& "Continue with operation on this selection?", _ 
vbYesNo) 
If intResponse = vbNo Then Cancel = True 
End Sub 

それともcustomizing the right-click menu

で見ることができます。

+0

ありがとうございました。私はどちらかを試してみたいとは思わない。私は実際に実際に友人に代わって尋ねています。 – stanigator

関連する問題