حذف همه پانوشت ها

Question

انواع خاصی از اسناد نیاز به استفاده از پاورقی برای کمک به منابع سند یا ارائه اطلاعات اضافی نسبت به محتوای مورد بحث دارند. در برخی موارد ممکن است بخواهید تمام پاورقی های سند خود را حذف کنید. یکی از مواردی که می توانید امتحان کنید این است که یک جستجوی ساده انجام دهید و همه پاورقی ها را جایگزین کنید. این مراحل را دنبال کنید:

شکل 1. تب Replace از کادر محاوره ای Find and Replace.

1. Ctrl+H را فشار دهید تا تب Replace در کادر محاوره ای Find and Replace نمایش داده شود. (شکل 1 را ببینید.)
2. در کادر Find What، ^f را وارد کنید. این نشان می دهد که می خواهید علائم پاورقی را جستجو کنید.
3. مطمئن شوید که کادر Replace With خالی است.
4. روی Replace All کلیک کنید.
5. کادر گفتگوی Find and Replace را ببندید.

این روش کار می کند زیرا هنگامی که علائم پاورقی را حذف می کنید، پاورقی مرتبط با آن علامت نیز به طور خودکار حذف می شود.

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

Sub DelFoots()
    Dim fn As Footnote

    For Each fn In ActiveDocument.Footnotes
        fn.Delete
    Next 
End Sub