Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.word.docmanagement
|
|||
|
|||
Two methods to insert autotext, yet different results. Why? Code enclosed
1. First Method:
I have written several macros to insert autotext that has some words bolded, some not, in the paragraphs. The macros are triggered from a custom drop-down tool bar menu I had made. When this method runs, no bolding displays when the autotext inserts via the macro. 2. Second method: If I manually insert the autotext from the Tools menu, the text inserts with appropriate words formatted in bold. Why does the second method give the desired results and the first doesn't? Here's the code from method one at the end of this message. I recorded a keystroke macro so maybe there's extra code in it that's messing up the desired result? Any help will be appreciated. Thanks, Charlie charlie6067 Sub VOL_DEN() ' ' InsertCoverage Macro ' Macro recorded 07/28/06 by Charlie Johnson ' PasswordOff Application.DisplayAutoCompleteTips = False With AutoCorrect .CorrectInitialCaps = True .CorrectSentenceCaps = True .CorrectDays = True .CorrectCapsLock = True .ReplaceText = True End With ActiveDocument.AttachedTemplate.AutoTextEntries("1 1. VOLUNTARY DENTAL"). _ Insert Whe=Selection.Range PasswordOn End Sub |
#2
Posted to microsoft.public.word.docmanagement
|
|||
|
|||
Two methods to insert autotext, yet different results. Why? Code enclosed
In the Insert method call, you need to include the optional RichText
parameter and set it to True: ActiveDocument.AttachedTemplate.AutoTextEntries("1 1. VOLUNTARY DENTAL"). _ Insert Whe=Selection.Range, RichText:=True If you have other macro-related questions, please post them to one of the microsoft.public.word.vba newsgroups. This group is high-volume and your question might be overlooked. -- Regards, Jay Freedman Microsoft Word MVP FAQ: http://word.mvps.org Email cannot be acknowledged; please post all follow-ups to the newsgroup so all may benefit. charlie6067 wrote: 1. First Method: I have written several macros to insert autotext that has some words bolded, some not, in the paragraphs. The macros are triggered from a custom drop-down tool bar menu I had made. When this method runs, no bolding displays when the autotext inserts via the macro. 2. Second method: If I manually insert the autotext from the Tools menu, the text inserts with appropriate words formatted in bold. Why does the second method give the desired results and the first doesn't? Here's the code from method one at the end of this message. I recorded a keystroke macro so maybe there's extra code in it that's messing up the desired result? Any help will be appreciated. Thanks, Charlie charlie6067 Sub VOL_DEN() ' ' InsertCoverage Macro ' Macro recorded 07/28/06 by Charlie Johnson ' PasswordOff Application.DisplayAutoCompleteTips = False With AutoCorrect .CorrectInitialCaps = True .CorrectSentenceCaps = True .CorrectDays = True .CorrectCapsLock = True .ReplaceText = True End With ActiveDocument.AttachedTemplate.AutoTextEntries("1 1. VOLUNTARY DENTAL"). _ Insert Whe=Selection.Range PasswordOn End Sub |
#3
Posted to microsoft.public.word.docmanagement
|
|||
|
|||
Two methods to insert autotext, yet different results. Why? Code enclosed
Thanks Jay for the help.
Charlie charlie6067 Jay Freedman wrote: In the Insert method call, you need to include the optional RichText parameter and set it to True: ActiveDocument.AttachedTemplate.AutoTextEntries("1 1. VOLUNTARY DENTAL"). _ Insert Whe=Selection.Range, RichText:=True If you have other macro-related questions, please post them to one of the microsoft.public.word.vba newsgroups. This group is high-volume and your question might be overlooked. -- Regards, Jay Freedman Microsoft Word MVP FAQ: http://word.mvps.org Email cannot be acknowledged; please post all follow-ups to the newsgroup so all may benefit. charlie6067 wrote: 1. First Method: I have written several macros to insert autotext that has some words bolded, some not, in the paragraphs. The macros are triggered from a custom drop-down tool bar menu I had made. When this method runs, no bolding displays when the autotext inserts via the macro. 2. Second method: If I manually insert the autotext from the Tools menu, the text inserts with appropriate words formatted in bold. Why does the second method give the desired results and the first doesn't? Here's the code from method one at the end of this message. I recorded a keystroke macro so maybe there's extra code in it that's messing up the desired result? Any help will be appreciated. Thanks, Charlie charlie6067 Sub VOL_DEN() ' ' InsertCoverage Macro ' Macro recorded 07/28/06 by Charlie Johnson ' PasswordOff Application.DisplayAutoCompleteTips = False With AutoCorrect .CorrectInitialCaps = True .CorrectSentenceCaps = True .CorrectDays = True .CorrectCapsLock = True .ReplaceText = True End With ActiveDocument.AttachedTemplate.AutoTextEntries("1 1. VOLUNTARY DENTAL"). _ Insert Whe=Selection.Range PasswordOn End Sub |
Reply |
Thread Tools | |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Insert autotext doesn't work in header and footer | Microsoft Word Help | |||
Header/Footer Insert Autotext disabled? | Microsoft Word Help | |||
Insert > Autotext is missing "filename" and "filename and path"; how to get back? | New Users | |||
simple word question | New Users | |||
Using Hyperlinks in Mail Merge IF...THEN...ELSE Statements | Mailmerge |