MS Word macros

[Jay]

The macro code,
For Each menu In ContextMenu.WordMenus
Set cb = Application.CommandBars(menu)
For Each ctl In cb.Controls
If ctl.Tag = "" Then
ctl.Delete
End If
Next ctl
Next menu
deleted all the right-click pop-up menu options(cut, copy, paste...).

How to recover the MSWord2000 right-click pop-up menu, disabled through the macro?

 

[Jean-Guy Marcil]

Jay was telling us:
Jay nous racontait que :

The macro code,
For Each menu In ContextMenu.WordMenus
Set cb = Application.CommandBars(menu)
For Each ctl In cb.Controls
If ctl.Tag = "" Then
ctl.Delete
End If
Next ctl
Next menu
deleted all the right-click pop-up menu options(cut, copy, paste...).

How to recover the MSWord2000 right-click pop-up menu, disabled
through the macro?

Delete Normal.dot (or rename it to save it if needed) and restart Word. This
should bring all menus back to what they were out of the box.

--
Salut!
_______________________________________
Jean-Guy Marcil - Word MVP
(e-mail address removed)
Word MVP site: http://www.word.mvps.org