WordBasic Macros to Write AutoText Entries to Text File

• Microsoft Word for Windows, version 6.0

SUMMARY

Microsoft Word for Windows does not include an option to write the contents of your Autotext entries to a text file. This article contains two macros that you can use to export your Autotext entries to a text file named either GLOBAL.TXT (for global Autotext entries) or TEMPLATE.TXT (for template Autotext entries).

Note: To generate a printed list of your AutoText entries instead of a text file, choose Print from the File command, select AutoText Entries in the Print What box, and choose the OK button.

MORE INFORMATION

Note: Microsoft provides this macro code "as is" without warranty of any kind, either expressed or implied, including but not limited to the implied warranties of merchantability and/or fitness for a particular purpose.

Global Autotext Entries

Use the following macro to write the global AutoText entries (entries from NORMAL.DOT and any global templates) to a text file named GLOBAL.TXT, stored in the current directory:

Sub MAIN

 a$ = AutoTextName$(count)
 Print #1, "Autotext Name: ", a$
 Print #1, GetAutoText$(a$)
 Print #1, ""

End Sub

Template Autotext Entries

Use the following macro to write the Autotext entries from the current template to a text file named TEMPLATE.TXT, stored in the current directory:

Sub MAIN

 a$ = AutoTextName$(count, 1)
 Print #1, "Autotext Name: ", a$
 Print #1, GetAutoText$(a$, 1)
 Print #1, ""

End Sub

Insert Autotext Entries into Document

Use the following macro to insert all global AutoText entries into a new document window.

Sub MAIN

 a$ = AutoTextName$(count)
 Bold 1 : Insert a$
 InsertPara
 Bold 0 : EditAutoText .Name = a$, .Insert
 InsertPara : InsertPara

End Sub

REFERENCES