قالب بندی جداول با فاصله در بسیاری از واژه پردازها غیر معمول نیست. فاصله های کافی بین هر ستون برای تراز کردن حرف اول هر ستون درج شده است. با این حال، Word شامل یک ویرایشگر جدول است که انعطاف پذیری بیشتری را در قالب بندی و کار با جداول فراهم می کند. تبدیل جداول ASCII که در اصل با فاصله فرمت شده اند به جداول Word می تواند زمان بر باشد. ماکرو VBA زیر به صورت خودکار قالب بندی را انجام می دهد. فرض بر این است که هر خط نشان دهنده یک ردیف متفاوت در جدول است، و هر چیزی فراتر از یک فضای واحد نشان دهنده تقسیم بین ستون ها است.
Sub SpacesToTable With Selection.Find .ClearFormatting .Replacement.ClearFormatting .Text = " {2,}" .Replacement.Text = "^t" .Forward = True .Wrap = wdFindStop .Format = False .MatchCase = False .MatchWholeWord = False .MatchAllWordForms = False .MatchSoundsLike = False .MatchWildcards = True End With Selection.Find.Execute Replace:=wdReplaceAll Selection.ConvertToTable _ Separator:=wdSeparateByTabs, _ Format:=wdTableFormatNone End Sub
قبل از اجرای ماکرو، متنی را که می خواهید تبدیل کنید انتخاب کنید. هنگامی که این ماکرو را اجرا می کنید، با کلیک بر روی ابزار Table (درج تب روبان) و انتخاب تبدیل متن به جدول، همان چیزی را دریافت خواهید کرد. این بدان معناست که ستون های شما ممکن است بد بو به نظر برسند. قطعا باید اندازه آنها تغییر کند. اما کار سخت خلاص شدن از شر همه فضاها برای شما انجام شده است.
