تبدیل لیست ها به متن

Question

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

در بیشتر موارد، این دقیقاً همان چیزی است که شما انتظار دارید و می خواهید لیست های شماره گذاری شده شما کار کنند. با این حال، ممکن است مواقعی وجود داشته باشد که بخواهید لیست‌ها "تجمیع" شوند، به این معنی که اعداد تغییر نخواهند کرد.

دو راه برای حل این مشکل وجود دارد. اولی که من از آن به عنوان روش brute force یاد می کنم، شامل کمی برش و چسباندن است. تنها کاری که باید انجام دهید این است که این مراحل کلی را دنبال کنید:

شکل 1. کادر محاوره ای Paste Special.

1. لیستی را که می خواهید ثابت کنید انتخاب کنید.
2. Ctrl+C را فشار دهید تا متن را در کلیپ بورد کپی کنید. فهرست همچنان باید انتخاب شود.
3. تب Home نوار را نمایش دهید.
4. روی فلش رو به پایین زیر ابزار Paste در گروه Clipboard نوار کلیک کنید، سپس Paste Special را انتخاب کنید. Word کادر محاوره ای Paste Special را نمایش می دهد. (شکل 1 را ببینید.)
5. متن Unformatted را به عنوان نوع چسباندن خود انتخاب کنید.
6. روی OK کلیک کنید.

این اقدامات جایگزین لیست پویا موجود با متن خود می شود و Word به طور خودکار شماره گذاری خودکار را به متن تبدیل می کند.

البته چندین اشکال مختلف در این مورد وجود دارد. اول از همه، هر قالب بندی خاص دیگری را که ممکن است در موارد لیست داشته باشید از دست می دهید. اگر قالب‌بندی‌های متفاوتی از کلمات با پیش‌فرض‌های پاراگراف دارید (مثلاً کلمات پررنگ یا مورب)، حذف می‌شوند و باید به صورت دستی دوباره انجام شوند.

یک رویکرد ساده تر این است که از یک ماکرو برای انجام کار برای شما استفاده کنید. VBA شامل یک روش ویژه است که اشکالاتی را که قبلاً ذکر شده را برطرف می کند و تبدیل را بسیار تمیزتر می کند. هیچ یک از قالب بندی های دیگر شما، به جز شماره های لیست خودکار، تحت تأثیر قرار نمی گیرد. ماکرو ListPlain زیر است:

Sub ListPlain()
    Dim lp As Paragraph

    For Each lp In ActiveDocument.ListParagraphs
        lp.Range.ListFormat.ConvertNumbersToText
    Next lp
End Sub

توجه کنید که ماکرو چقدر کوتاه است. همچنین بسیار سریع اجرا می شود و بر تمام شماره گذاری در کل سند تأثیر می گذارد. هر لیست شماره گذاری شده ای که به شماره گذاری خودکار Word متکی باشد، مانند هر فیلد LISTNUM تحت تأثیر قرار می گیرد.