Ureader.com  
Microsoft software help and Community
   home   |   control panel login   |   archive   |  
 
Word
application.errors
conversions
docmanagement
drawing.graphics
formatting.longdocs
international
internet.assistant
mail
mailmerge.fields
menustoolbars
newusers
numbering
oleinterop
pagelayout
printingfonts
setup.networking
spelling.grammar
tables
vba.addins
vba.beginners
vba.customization
vba.general
vba.userforms
web.authoring
word6-7macros
word97vba
  
 
date: Wed, 19 Oct 2005 15:03:02 -0700,    group: microsoft.public.word.setup.networking        back       


Using VB to export and import autotext   
We use a log off script to copy a centrally locked down normal.dot to 
everyones workstation.  This normal.dot enforces the companies style guide to 
ensure that all documents have the same look and feel no matter which 
departments created the document.

The obvious issue with this setup is that when users logs off they loose all 
of their autext entries.  What I would like to achieve is to have log off 
script extract the autotext to a file and the log in script import the autext 
back into the refreshed normal.dot.

I have managed to  locate a vb script which can export the autext to a 
screen message but my script writing skills are not good enough to take this 
to the next level.

On Error Resume Next

Set objWord = CreateObject("Word.Application")
Set objOptions = objWord.Options
Set objDoc = objWord.Documents.Add()

Wscript.Echo"Show AutoComplete suggestions: " & _
     objWord.DisplayAutoCompleteTips
For Each strEntry in objWord.NormalTemplate.AutoTextEntries
    Wscript.Echo "AutoText entry: " & strEntry.Name
Next

objWord.Quit

Hope someone can help.

-- 
Scott Lawry
date: Wed, 19 Oct 2005 15:03:02 -0700   author:   Scott Lawry

Google
 
Web ureader.com


    COPYRIGHT 2007, YARDI TECHNOLOGY LIMITED, ALL RIGHT RESERVE  |   contact us