Word文書の脚注/文末脚注の区切り線を削除するにはどうすればよいですか？
Word文書に脚注または文末脚注を挿入すると、脚注または文末脚注のテキストの上に常に水平の区切り線が表示されます。 これらの区切り線を削除したい場合は、この記事のメソッドを試してください。
Wordの脚注/文末脚注の区切り線を削除する
Wordの脚注または文末脚注の区切り線は、次のように削除できます。
1.ドキュメントで、脚注または文末脚注の区切り線を削除します。 詳しく見る > ドラフト.
2。 次に、をクリックします 参考文献 > ショーの注意事項 以下のスクリーンショットのように。
3.ドキュメントに脚注と文末脚注の両方がある場合、 ショーの注意事項 ダイアログボックスが表示されます。必要に応じてオプションを選択し、[ OK ボタン。 ここで私は選択します 脚注を見る エリア。
Note：ドキュメントに脚注または文末脚注のみが存在する場合は、この手順を無視して手順4に進みます。
4.今、 ノート ドキュメントの最後にセクションが表示されています。選択してください 脚注セパレーター セクションに 脚注 ドロップダウンリストで、区切り線を選択し、を押します。 削除 それを削除するためのキー。 スクリーンショットを参照してください：
5.にシフトします 印刷レイアウト ドキュメントの表示。
次に、脚注の区切り線がドキュメントからすぐに削除されていることがわかります。
Note：文末脚注の区切り線を削除するには、チェックする必要があります 巻末注を見る 上記のエリア ショーの注意事項 ダイアログをクリックし、 巻末注セパレーター セクションに 残念 ドロップダウンリスト。
VBAコードで脚注/文末脚注の区切り線を削除する
上記の方法が不便な場合は、次のVBAコードを試して、脚注のすべての区切り行、または脚注と文末脚注の両方をドキュメントからすばやく削除できます。
1.ドキュメントで、脚注の区切り行を削除し、を押します。 他の + F11 キーを押して アプリケーション向け Microsoft Visual Basic 窓。
2。 の中に アプリケーション向け Microsoft Visual Basic ウィンドウ、クリック インセット > モジュール。 次に、以下のVBAコードをモジュールウィンドウにコピーします。
VBAコード：ドキュメントの脚注区切り行を削除
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 Sub3。 プレス F5 コードを実行するためのキー。 次に、すべての脚注の区切り線がドキュメントからすぐに削除されます。
Note：脚注と文末脚注のすべての区切り行を削除する場合は、以下のVBAコードが役立ちます。
VBAコード：ドキュメントの脚注と文末脚注の区切り行を削除します
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最高のオフィス生産性向上ツール
Kutools for Word - Over で単語体験を向上させましょう 100 注目すべき機能！
🤖 Kutools AI アシスタント: AI であなたの文章を変革します - コンテンツを生成する / テキストを書き換える / 文書を要約する / 情報のお問い合わせ 文書に基づいて、すべて Word 内で
📘 ドキュメントマスタリー: 分割ページ / ドキュメントをマージする / 選択内容をさまざまな形式でエクスポート (PDF/TXT/DOC/HTML...) / PDFへの一括変換 / ページを画像としてエクスポート / 複数のファイルを一度に印刷する...
✏ コンテンツ編集: バッチ検索と置換 複数のファイルにわたる / すべての画像のサイズを変更する / テーブルの行と列を転置する / 表をテキストに変換...
🧹 楽にお掃除：振り払って 余分なスペース / セクションブレーク / すべてのヘッダー / テキストボックス / ハイパーリンク / その他の取り外しツールについては、当社の Web サイトをご覧ください。 グループを削除...
➕ クリエイティブインサート：挿入 千の区切り文字 / チェックボックス / ラジオボタン / QRコード / バーコード / 斜線テーブル / 方程式のキャプション / 画像キャプション / テーブルキャプション / 複数の写真 / 詳細については、 グループを挿入...
🔍 正確な選択： ピンポイント 特定のページ / テーブル / シェイプ / 見出し段落 / ナビゲーションを強化する 他には？ 機能の選択...
⭐ スターの強化: あらゆる場所に素早く移動 / 繰り返しのテキストを自動挿入 / ドキュメントウィンドウをシームレスに切り替える / 11 変換ツール...
