Got a version of Word that uses the menu interface (Word 97, Word 2000, Word 2002, or Word 2003)? This site is for you! If you use a later version of Word, visit our WordTips site focusing on the ribbon interface.
With more than 50 non-fiction books and numerous magazine articles to his credit, Allen Wyatt is an internationally recognized author. He is president of Sharon Parq Associates, a computer and publishing services company.
Learn more about Allen...
If you have developed custom toolbars in Word, you may have noticed a problem with them. Do they "move around," meaning that they are in different places every time you start Word? If this is the case, you may be wondering how to make the toolbars stay put, exactly where you want them to be.
The first thing to understand is that positioning information for toolbars is maintained by Word in the HKEY_CURRENT_USER\Software\Microsoft\Office\9.0\Word\Data Registry key. (Actually, the 9.0 portion of the key changes, depending on your version. This is for Word 2000. If you are using Word 97, it is 8.0, and it is 10.0 for Word 2002.)
Whenever you exit Word, the toolbar positions are written into the Registry. Because of this, you can try these steps to permanently position the toolbars:
The next time you start Word, the toolbars should be where you want them to be. If they aren't, you may want to exit Word and try deleting the \Word\Data Registry key, as described earlier in this tip. When you next start Word, the Registry key is automatically created, and you can again try positioning the toolbars.
Another approach is to use a macro to lock the position of your toolbars. Add the following macro to the Document New event of the template itself.
Sub LockAllVisibleToolbars() Dim cb As CommandBar For Each cb In CommandBars If cb.Visible = True Then cb.Protection = msoBarNoChangeDock + _ msoBarNoChangeVisible + _ msoBarNoCustomize + _ msoBarNoMove + _ msoBarNoResize End If Next cb End Sub
It is, of course, run each time a new document is created based on the template. The macro locks the position of the toolbars and does not allow them to be moved or customized. You can unlock the toolbars by running this macro:
Sub UnlockAllVisibleToolbars() Dim cb As CommandBar For Each cb In CommandBars If cb.Visible = True Then If cb.Name = ("Task Pane") Then cb.Protection = msoBarNoCustomize Else cb.Protection = msoBarNoProtection End If End If Next cb End Sub
WordTips is your source for cost-effective Microsoft Word training. (Microsoft Word is the most popular word processing software in the world.) This tip (1354) applies to Microsoft Word 97, 2000, 2002, and 2003.
Create Custom Apps with VBA! Discover how to extend the capabilities of Office 2013 (Word, Excel, PowerPoint, Outlook, and Access) with VBA programming, using it for writing macros, automating Office applications, and creating custom applications. Check out Mastering VBA for Office 2013 today!