در طول سال ها، شرکت فیلیپ هزاران و هزاران سند Word را توسعه داده است. آنها اخیراً زیرساخت شبکه خود را تغییر دادند تا از سرورهای مختلف استفاده کنند و رایانههایی را برای همه در بخش فیلیپ ارتقاء دادهاند. وقتی شخصی یکی از آن اسناد از پیش موجود را باز می کند، به دنبال الگویی می گردد که در زیرساخت قدیمی وجود داشته است، اما دیگر در دسترس نیست. این به این معنی است که باز شدن سند زمان زیادی می برد و پس از آن می توانند مرجع بد الگو را تغییر دهند. اگر فیلیپ مجبور باشد هر یک از اسناد قدیمی را باز کند، روزها و روزها طول می کشد تا این کار انجام شود، بنابراین او فکر می کند که آیا راهی برای تغییر ارجاعات الگو به طور موثرتر، بدون نیاز به باز کردن هر سند وجود دارد.
این میتواند واقعاً آزاردهنده باشد—چند چیزهایی (در دفتر) بدتر از خیره شدن به صفحه رایانه و منتظر ماندن برای اتمام مراحل وجود دارد. اتفاقی که می افتد این است که Word فکر می کند قالب های شما در یک مکان خاص هستند و از ویندوز می خواهد که الگو را در آن مکان دریافت کند. ویندوز با وظیفهشناسی تلاش میکند (و تلاش میکند و تلاش میکند) مطابقت داشته باشد، و مکرراً به دنبال مکان است. زمان هر تلاش به پایان می رسد، و کل زمان صرف شده در این تلاش بیهوده کاملاً قابل توجه است.
راه حل این است که از یک ماکرو برای بارگیری هر سند در یک فهرست و تغییر الگوی پیوست شده به آن سند استفاده کنید. نمونه زیر نمونه ای از این ماکروها است:
Sub BatchTemplateChange() Dim sPathToTemplates As String Dim sPathToDocs As String Dim sDoc As String Dim dDoc As Document Dim sNewTemplate As String Dim i As Long On Error Resume Next Application.ScreenUpdating = False sNewTemplate = "normal.dotx" new template name sPathToDocs = Options.DefaultFilePath(wdDocumentsPath) & "" sPathToTemplates = Options.DefaultFilePath(wdUserTemplatesPath) & "" sDoc = Dir(sPathToDocs & "*.doc") While Len(sDoc) <> 0 Set dDoc = Documents.Open(FileName:=sPathToDocs & sDoc) dDoc.AttachedTemplate = sPathToTemplates & sNewTemplate dDoc.Close wdSaveChanges sDoc = Dir i = i + 1 Wend Application.ScreenUpdating = True MsgBox "Finished: " & i & " documents changed" End Sub
توجه داشته باشید که ماکرو هر سند را در محل سند پیش فرض بارگیری می کند، اما این لزوما سرعت بارگیری را افزایش نمی دهد. مزیت استفاده از ماکرو این است که میتوانید آن را اجرا کنید و اجازه دهید زمانی که از رایانه دور هستید کار کند.
ایده های اضافی برای رویکرد برنامه ای را می توان در مقاله زیر یافت که ممکن است برای برخی از خوانندگان مفید باشد: