Cum se elimină linia separatorului de notă de subsol / notă de sfârșit în documentul Word?
Când inserați note de subsol sau note de sfârșit în documentul Word, veți găsi că există întotdeauna o linie de separare orizontală deasupra textelor notei de subsol sau a notelor de final. Dacă doriți să scăpați de aceste linii de separare, încercați metodele din acest articol.
Eliminați linia de separare a notei de subsol / notă de final în Word
Eliminați linia de separare a notei de subsol / notă de sfârșit cu codul VBA
Eliminați linia de separare a notei de subsol / notă de final în Word
Puteți elimina linia de separare a notei de subsol sau a notelor de final în Word după cum urmează.
1. În document, veți elimina nota de subsol sau linia de separare a notelor de final, faceți clic pe Vizualizare > Proiect.
2. Apoi apasa Referinte > Afișați notele după cum se arată în imaginea de mai jos.
3. Dacă în documentul dvs. există atât note de subsol, cât și note de final, a Afișați notele va apărea caseta de dialog, selectați o opțiune după cum aveți nevoie și apoi faceți clic pe OK buton. Aici selectez Vizualizați nota de subsol zona.
notițe: Dacă există doar nota de subsol sau nota de sfârșit în documentul dvs., ignorați acest pas și treceți la pasul 4.
4. Acum notițe secțiunea se afișează la sfârșitul documentului, vă rugăm să selectați Separator de note de subsol în Note de subsol lista verticală, selectați linia de separare și apoi apăsați tasta Șterge tasta pentru ao șterge. Vedeți captura de ecran:
5. Treceți la Aspect tipărire vizualizarea documentului.
Apoi puteți vedea că linia separatoare a notei de subsol este eliminată imediat din document.
notițe: Pentru a elimina linia de separare a notei de final, trebuie doar să verificați Vizualizați nota finală zona din cele de mai sus Afișați notele , apoi selectați Separator de note finale în Endnotes lista verticală.
Eliminați liniile de separare a notei de subsol / notei de final cu codul VBA
Dacă metoda de mai sus este incomodă pentru dvs., puteți încerca următoarele coduri VBA pentru a elimina rapid toate liniile de separare ale notei de subsol sau ambelor note de subsol și notă de final din document.
1. În document veți elimina linia separatorului de notă de subsol, apăsați tasta Alt + F11 tastele pentru a deschide Microsoft Visual Basic pentru aplicații fereastră.
2. În Microsoft Visual Basic pentru aplicații fereastră, faceți clic pe Insera > Module. Apoi copiați mai jos codul VBA în fereastra Module.
Cod VBA: eliminați linia de separare a notelor de subsol din document
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
3. apasă pe F5 tasta pentru a rula codul. Apoi, toate liniile de separare ale notelor de subsol sunt eliminate imediat din document.
notițe: Dacă doriți să eliminați toate liniile de separare ale notei de subsol și ale notei de final, codul VBA de mai jos vă poate ajuta.
Cod VBA: eliminați liniile de separare a notei de subsol și a notelor de final din document
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
Cele mai bune instrumente de productivitate de birou
Kutools pentru Cuvânt - Crește-ți experiența Word cu Over 100 Caracteristici remarcabile!
🤖 Asistent AI Kutools: Transformă-ți scrisul cu AI - Generați conținut / Rescrie textul / Rezumat documente / Solicitați informații pe baza Documentului, toate în Cuvânt
📘 Stăpânirea documentelor: Pagini împărțite / Fuzionați documente / Exportați selecția în diferite formate (PDF/TXT/DOC/HTML...) / Conversie lot în PDF / Exportați paginile ca imagini / Imprimați mai multe fișiere simultan...
✏ Editarea continutului: Găsiți și înlocuiți în lot peste mai multe fișiere / Redimensionați toate imaginile / Transpuneți rânduri și coloane de tabel / Convertiți tabelul în text...
🧹 Curățare fără efort: Îndepărtați Spații suplimentare / Secțiuni pauze / Toate anteturile / Casete text / hiperlinkuri / Pentru mai multe instrumente de îndepărtare, mergeți la Eliminați grupul...
➕ Inserții creative: Inserați Mii de separatori / Casete de bifare / Butoane radio / QR Code / coduri de bare / Tabel cu linii diagonale / Legenda ecuației / Image Caption / Legenda tabelului / Imagini multiple / Descoperiți mai multe în Inserați grupul...
???? Selectii de precizie: Repera cu precizie Pagini specifice / Mese / Forme / Paragrafe de titlu / Îmbunătățiți navigarea cu mai mult Selectați caracteristici...
⭐ Îmbunătățiri de stele: Navigați la orice locație / Inserarea automată a textului repetitiv / Comutați între ferestrele documentelor / 11 Instrumente de conversie...