به روز رسانی لیست استثناء املا به صورت خودکار

Question

اگر متوجه شدید که لیست حذف املا را کمی به روز می کنید، ممکن است همیشه فایل را بارگیری کنید، کلمه را اضافه کنید و سپس فایل را دوباره ذخیره کرده و ببندید. هنگامی که از دیکشنری های سفارشی استفاده می کنید، Word به شما اجازه می دهد تا با کلیک یک دکمه یک کلمه را به آنها اضافه کنید. با این حال، وقتی نوبت به لیست حذف می شود، چنین رویکرد ساده ای وجود ندارد.

ماکرو زیر به شما این امکان را می دهد که به سرعت یک کلمه را به لیست حذف اضافه کنید. می‌توانید این ماکرو را به دکمه‌ای در نوار ابزار اختصاص دهید، و سپس می‌توانید به سادگی با برجسته کردن یک کلمه و سپس کلیک کردن روی دکمه، فهرست را به‌روزرسانی کنید:

Sub Exclude()
    Dim sAddWords As String

    sAddWord = Trim(Selection.Text)
    ChangeFileOpenDirectory _
      "C:Program FilesCommon FilesMicrosoft SharedProof"

    " The file name in the next line should be changed so it
    " reflects the proper exclude file name for your system
    Documents.Open FileName:="mssp2_en.exc", _
      ConfirmConversions:=False, ReadOnly:=False, _
      AddToRecentFiles:=False, PasswordDocument:="", _
      PasswordTemplate:="", Revert:=False, _
      WritePasswordDocument:="", WritePasswordTemplate:="", _
      Format:=wdOpenFormatAuto
    Selection.TypeText Text:=sAddWord
    Selection.TypeParagraph
    ActiveDocument.Close SaveChanges:=wdSaveChanges, _
      OriginalFormat:=wdOriginalDocumentFormat
End Sub

این ماکرو کلمه انتخاب شده را در سند شما "پاک می کند" و آن را به ابتدای فایل Exclude اضافه می کند. هنگامی که فایل exclude بارگذاری می‌شود، تغییر می‌کند و سپس بسته می‌شود، یک فلش سریع روی صفحه نمایش خود مشاهده خواهید کرد، اما کلمه برای زمانی که در آینده از Word استفاده می‌کنید در فایل exclude موجود است.

باید مطمئن شوید که نام فایل مورد استفاده برای فایل exclude را تغییر داده اید. همانطور که در شماره های دیگر WordTips آموخته اید ، نام فایل می تواند از سیستمی به سیستم دیگر متفاوت باشد.