ویژگی AutoCorrect در Word می تواند بسیار مفید باشد. ممکن است زمانی پیش بیاید که بخواهید فهرستی از ورودی های تصحیح خودکار را چاپ کنید، فقط برای اینکه از وجود آنها آگاه شوید. هیچ دستور ذاتی در Word برای تمام ورودی های AutoCorrect وجود ندارد، مانند اینکه می توانید ورودی های AutoText را چاپ کنید. با این حال، می توانید از یک ماکرو برای چاپ ورودی های تصحیح خودکار خود استفاده کنید:
Sub PrintAutoCorrect() Dim a As AutoCorrectEntry Selection.ParagraphFormat.TabStops.ClearAll Selection.ParagraphFormat.TabStops.Add Position:=72, _ Alignment:=wdAlignTabLeft, Leader:=wdTabLeaderSpaces For Each a In Application.AutoCorrect.Entries Selection.TypeText a.Name & vbTab & a.Value & " " & vbCr Next End Sub
قبل از اجرای این ماکرو، مطمئن شوید که با یک سند جدید شروع کرده اید. ماکرو نقطه تب را در پاراگراف فعلی تنظیم می کند و سپس هر ورودی تصحیح خودکار را در سیستم "تایپ" می کند. هنگامی که در حال اجرا است (خیلی سریع است)، می توانید لیست را چاپ کنید و سپس سند را دور بیندازید.
