🎥 #ترفندهای_ویرایش #ورد 🔍 تبدیل خودکار پاورقی به ارجاع درون‌متنی 🔹 طریق ماکرو ✍️ دستور: در محیط ورد، Alt+F11 را بزنید تا پنجرۀ Microsoft Visual basic for Applications باز شود. از منوی درختی سمت چپ، Normal را انتخاب کنید و بعد از منوی Insert گزینه Module را انتخاب کنید. کد زیر را در کادر بازشده کپی کنید. Sub AddFnTextInBodyOfDoc() Dim f As Footnote Dim r As Range For Each f In ActiveDocument.Footnotes Set r = f.Reference r.Collapse wdCollapseEnd r.InsertAfter "(" & f.Range.Text & ")" f.Delete Next f End Sub ✅ تذکر • اگر می‌خواهید ارجاعات درون‌متنی شما مثلاً درون قلاب قرار بگیرد، در خط هفتم به‌جای پرانتز از [ ] استفاده کنید. • اگر می‌خواهید پاورقی‌ها پس از تبدیل باقی بمانند، خط هشتم را پاک کنید. سپس روی آیکن ذخیره کلیک کرده و پنجره را ببندید. حال در محیط ورد Alt+F8 را زده و در پنجره بازشده روی AddFnTextInBodyOfDoc (و اگر چندتا بود روی آخرین شماره‌اش) کلیک کنید، سپس Run را بزنید. #ماکرو_نویسی ❌انتشار مطالب فقط به صورت فوروارد❌