در حالت عادی وقتی پاورقی به صفحه Word اضافه می کنید، خطی ➖ در بالای آن قرار می‌گیرد. شما می توانید این خط را حذف کنید. در این مطلب از کلاسیک وب به آموزش حذف خط پاورقی در ورد میپردازیم.
تنظیمات خط پاورقی در ورد
?How to Remove Footnote Line in Word
وقتی پاورقی به صفحه ورد خود اضافه می کنید، در بالای آن خطی قرار می گیرد که این بخش را از بخش بالایی جدا می کند. این خط به سادگی حذف می شود. در این مطلب از کلاسیک وب نحوه حذف خط پاورقی را آموزش می دهیم. با ادامه این مطلب ما را همراهی کنید.
حذف و تغییر خط پاورقی در ورد
برای تغییر تنظیمات پاورقی در ورد و حذف آن روی View > Draft کلیک کنید.
حال متن شما در حالت Draft نمایش داده می‌شود.
سپس روی References > Show Notes کلیک کنید.
اگر در متن شما هم پاورقی و هم انتهانویسی وجود دارد، پنجره Show Notes باز خواهد شد. گزینه View footnote area را انتخاب کنید. روی OK بزنید.
حال در پایین صفحه گزینه Footnote Separator را برای Footnotes انتخاب کنید. سپس روی خط نمایان شده کلیک کنید و Delete را انتخاب کنید.
در مواردی که تنها پاورقی وجود دارد، گزینه Footnotes در پایین صفحه نمایان می شود که گزینه All Footnotes انتخاب شده است.
سپس روی فلش جلوی Footnotes کلیک کنید.
Footnote Separator را انتخاب کنید.
حال خط پاورقی نمایان می شود. خط را به همراه هر گونه فضای اضافی زیر آن، انتخاب کنید.
حال روی Delete بزنید.
سپس به View بروید و Print Layout را انتخاب کنید.
همان طور که می بینید، خط حذف شده است.
انتقال خط پاورقی در ورد و حذف آن با کد VBA
روش دیگر این است که از VBA برای حذف خط پاورقی استفاده کنید. برای این کار فایل ورد را باز کنید. Alt + F11 را فشار دهید تا Microsoft Visual Basic for Applications باز شود. در این بخش روی Insert > Module کلیک کنید. سپس کد زیر را کپی و در پنجره Module پیست کنید.
Sub DeleteTheFootnoteSeparator()
‘Updated by ExtendOffice 20181112
If ActiveDocument.Footnotes.Count < 1 Then Exit Sub
If ActiveWindow.View.SplitSpecial = wdPaneNone Then
ActiveWindow.ActivePane.View.Type = wdNormalView
Else
ActiveWindow.View.Type = wdNormalView
End If
With ActiveWindow.ActivePane.View
If .Type = wdPrintView Or .Type = wdWebView Or _
.Type = wdPrintPreview Then
ActiveWindow.View.SeekView = wdSeekFootnotes
Else
ActiveWindow.View.SplitSpecial = wdPaneFootnotes
End If
End With
ActiveWindow.View.SplitSpecial = wdPaneFootnoteSeparator
With Selection
.MoveRight Unit:=wdCharacter
.TypeBackspace
.TypeBackspace
End With
ActiveWindow.View.SplitSpecial = wdPaneFootnoteContinuationSeparator
With Selection
.MoveRight Unit:=wdCharacter, Count:=1
.TypeBackspace
.TypeBackspace
With .ParagraphFormat
.LineSpacingRule = wdLineSpaceMultiple
.LineSpacing = LinesToPoints(0.06)
End With
End With
ActiveWindow.View.Type = wdPrintView
End Sub
F5 را فشار دهید تا کد اجرا شود. حال تمامی خطوط حذف خواهند شد.
اگر می‌خواهید هم خط پاورقی و هم خط انتهانویسی فایل را حذف کنید، از کد زیر استفاده کنید:
Sub DeleteTheFootnoteSeparator()
‘Updated by ExtendOffice 20181112
If ActiveDocument.Footnotes.Count < 1 Then Exit Sub
If ActiveWindow.View.SplitSpecial = wdPaneNone Then
ActiveWindow.ActivePane.View.Type = wdNormalView
Else
ActiveWindow.View.Type = wdNormalView
End If
With ActiveWindow.ActivePane.View
If .Type = wdPrintView Or .Type = wdWebView Or _
.Type = wdPrintPreview Then
ActiveWindow.View.SeekView = wdSeekFootnotes
Else
ActiveWindow.View.SplitSpecial = wdPaneFootnotes
End If
End With
ActiveWindow.View.SplitSpecial = wdPaneFootnoteSeparator
With Selection
.MoveRight Unit:=wdCharacter
.TypeBackspace
.TypeBackspace
End With
ActiveWindow.View.SplitSpecial = wdPaneFootnoteContinuationSeparator
With Selection
.MoveRight Unit:=wdCharacter, Count:=1
.TypeBackspace
.TypeBackspace
With .ParagraphFormat
.LineSpacingRule = wdLineSpaceMultiple
.LineSpacing = LinesToPoints(0.06)
End With
End With
ActiveWindow.View.SplitSpecial = wdPaneEndnoteSeparator
With Selection
.MoveRight Unit:=wdCharacter
.TypeBackspace
.TypeBackspace
End With
ActiveWindow.View.SplitSpecial = wdPaneEndnoteContinuationSeparator
With Selection
.MoveRight Unit:=wdCharacter, Count:=1
.TypeBackspace
.TypeBackspace
With .ParagraphFormat
.LineSpacingRule = wdLineSpaceMultiple
.LineSpacing = LinesToPoints(0.06)
End With
End With
ActiveWindow.View.Type = wdPrintView
End Sub
برای یادگیری اصول پاورقی نویسی، مطلب آموزش قدم به قدم و تصویری ایجاد و نوشتن پاورقی در ورد را مطالعه کنید.
نظرات و پیشنهادات شما؟
در این مطلب از کلاسیک وب روش حذف خط پاورقی در ورد را آموزش دادیم. آیا موفق به حذف این خط شدید؟ لطفاً نظرات و تجربیات خود را در بخش دیدگاه با ما در میان بگذارید.
آخرین دیدگاه ها
تا کنون دیدگاهی ثبت نشده است.