Home |
Search |
Today's Posts |
|
#1
Posted to microsoft.public.word.docmanagement
|
|||
|
|||
How can I customize a toolbar to insert a specific word in the
Simply inserting text in the footer is easy enough. The following macro will
type 'confidential' in the footer, but there are lots of issues to consider and removal by a toggle is a whole different ball game. For example: which footer? A document can have many different footers. Is there other text in the footer. How do you want the entry formatting etc. This could be a major exercise, whereas manually opening the footer and inserting an autotext entry as already suggested is much more practical. I wonder too if a watermark might not be more appropriate? However, if you want to play around with it for yourself, the code is Sub Confidential() Dim startView As String startView = ActiveWindow.View ActiveWindow.ActivePane.View.Type = wdPrintView ActiveWindow.ActivePane.View.SeekView = wdSeekCurrentPageFooter Selection.TypeText Text:="Confidential" ActiveWindow.ActivePane.View.SeekView = wdSeekMainDocument ActiveWindow.ActivePane.View.Type = startView End Sub http://www.gmayor.com/installing_macro.htm If you need help with the complexities of vba programming then your question is more appropriately asked in one of the vba forums. -- Graham Mayor - Word MVP My web site www.gmayor.com Word MVP web site http://word.mvps.org Christian wrote: Cooz, Thanks for your answer. I tried to do as you told me, but I canīt make the Autotext Confidential be displayed automatically in the Footer. It is added where is the cursor in the document. Do you know any other solution? I would like to have buttoms (like Bold, Italic, etc.,) where I can select one of them and the document footer would be changed to Confidential, and, if I clik again in the same buttom, the word Confidential is deleted from the footer. "Cooz" escreveu: Hi Christian, You can place your words in AutoText fragments in your template. With Tools Customize... | tab Commands, you can choose AutoText under 'Categories:'. Drag your AutoText fragments from the 'Commands:' list to their places on your toolbar. Good luck, Cooz -- PS: If this is a satisfying answer to your question and you're logged in via the Microsoft site, please click Yes to "Did this post answer the question?". Thanks. "Christian" wrote: Hi, I need to create a toolbar with comands to be used in Data Classification. My idea is to add the words confidential, secret and public (each one in a different command on the toolbar) in the footer of a Word document. I tried to use some pre-defined command but they need addictional steps to do the task. Can anyone help me? |
Reply |
Thread Tools | |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Word 97 in Windows XP to maintain formatting | Microsoft Word Help | |||
How to put graphics on envelopes? | Microsoft Word Help | |||
How do I get rid of page numbers. The page number virus | Microsoft Word Help | |||
Macros - Keyboard Commands | Microsoft Word Help | |||
In Word, how can I see all files (*.*) in "save as"? | New Users |