Comments on: Disable Popup Menu in MS Office

By: office viewer

office viewer — Sun, 09 Nov 2008 01:50:02 +0000

How do I disable the popup menu in the slide show? or disable copy / print and edit option?

It is the menu number 45; controls from 1 to 8 , that disable all options of the menu displayed with the right click

objPPT.application.CommandBars(45).controls(1).enabled=false; (advance option , first of the menu)
..
objPPT.application.CommandBars(45).controls(8).enabled=false;

By: office viewer

office viewer — Mon, 07 Jul 2008 13:34:29 +0000

Change the position of the toolbar

Sub AdjustToolbarPos()
objExcel.Application.CommandBars(“clipboard”).Visible = True
objExcel.Application.CommandBars(“clipboard”).Position = msoBarTop
objExcel.Application.CommandBars(“clipboard”).RowIndex = CommandBars(“standard”).RowIndex
objExcel.Application.CommandBars(“clipboard”).Left = CommandBars(“standard”).Left + CommandBars(“standard”).Width
End Sub

By: office viewer

office viewer — Mon, 07 Jul 2008 13:32:24 +0000

How to know the Caption of the menu item in MS Office?

Sub ListAllMenuItems()
For i = 1 To CommandBars.Count
Selection.TypeText i & “:” & CommandBars(i).Name
Selection.TypeParagraph
For a = 1 To CommandBars(i).Controls.Count
Selection.TypeText ” ” & a & “:” & CommandBars(i).Controls(a).Caption
Selection.TypeParagraph
Next
Next
End Sub

By: office viewer

office viewer — Mon, 07 Jul 2008 13:31:16 +0000

Disable the Print command:

objExcel.Application.CommandBars(“menu Bar”).Controls(“&File”).Controls(“&Print…”).Enabled = False