Wordですべての文末脚注をプレーンテキストに変換する方法
巻末注をテキストに変換すると、文末脚注を編集または削除するのに便利です。 たとえば、他の通常のテキストと一緒に文末脚注を一度に選択したい場合、Wordではそれを許可しません。 どうすれば簡単にそれを成し遂げることができますか? このチュートリアルでは、文末脚注をプレーンテキストに変換するいくつかの方法を紹介します。
Kutools forWordを使用して文末脚注をテキストに変換する
巻末注を手動でテキストに変換する
1.文末脚注のある場所にカーソルを置き、を押します。 Ctrlキー+ ドキュメントからすべての文末脚注を選択します。 スクリーンショットを参照してください:
2。 押す Ctrlキー+ C 巻末注をコピーします。
3。 押す Ctrl + End カーソルをドキュメント全体の最後と文末脚注の前に移動します。
4。 押す Ctrlキー+ V 巻末注をドキュメントの最後に貼り付けます。 巻末注の順序はそのままですが、貼り付けた巻末注が変更されました。 スクリーンショットを参照してください:
5.テキストの前のすべての番号1を元の番号リストに手動で置き換えます。
VBAを使用して文末脚注をテキストに変換する
つまり、VBAコードを使用して文末脚注をプレーンテキストに変換することもできます。
1:押す Alt + F11 を開く Microsoft Visual Basic forApplicationsウィンドウ;
2:クリック モジュール から インセット タブで、次のVBAコードをコピーして貼り付けます モジュール 窓;
3:クリック ラン ボタンまたはプレス F5 VBAを適用します。
巻末注をテキストに変換するVBA:
Sub convertendnote()
Dim aendnote As Endnote
For Each aendnote In ActiveDocument.Endnotes
ActiveDocument.Range.InsertAfter vbCr & aendnote.Index _
& vbTab & aendnote.Range
aendnote.Reference.InsertBefore "a" & aendnote.Index & "a"
Next aendnote
For Each aendnote In ActiveDocument.Endnotes
aendnote.Reference.Delete
Next aendnote
Selection.Find.ClearFormatting
Selection.Find.Replacement.ClearFormatting
With Selection.Find.Replacement.Font
.Superscript=True
End With
With Selection.Find
.Text="(a)([0-9]{1,})(a)"
.Replacement.Text="\2"
.Forward=True
.Wrap=wdFindContinue
.Format=True
.MatchWildcards=True
End With
Selection.Find.Execute Replace:=wdReplaceAll
End Sub
ご注意: マクロの最初と最後を好きなように変更できます。
Kutools forWordを使用して文末脚注をテキストに変換する
これらのコンピューターの新しい手にとって、VBAは複雑すぎて処理できません。 しかし、 Kutools for Word インストールすると、すべての文末脚注をテキストにすばやく変換できます。 Convert Endnotes to Text ワンクリックでユーティリティ。
インストールした後 Kutools for Word、以下のようにしてください:
1.をクリックして、このユーティリティを適用してください クツール > 変換 > Convert Endnotes to Text。 スクリーンショットを参照してください:
2。 クリック後 Convert Endnotes to Text、以下のスクリーンショットが示すように結果が表示されます。
デモ: Word ですべての文末脚注をテキストにすばやく変換する
関連記事:
最高のオフィス生産性向上ツール
Kutools for Word - Over で単語体験を向上させましょう 100 注目すべき機能!
🤖 Kutools AIの機能: コンテンツを生成する / テキストを書き換える / ドキュメントに関するQ&A / すぐに回答を得る / ドキュメントを翻訳する / ポーランド語文書(保存形式)...
📘 ドキュメントマスタリー: 分割ページ / ドキュメントをマージする / 選択内容をさまざまな形式でエクスポート (PDF/TXT/DOC/HTML...) / PDFへの一括変換...
✏ コンテンツ編集: 複数のファイルにわたるバッチ検索と置換 / すべての画像のサイズを変更する / テーブルの行と列を転置する / 表をテキストに変換...
🧹 楽にお掃除: 掃き捨てる 余分なスペース / セクションブレーク / テキストボックス / ハイパーリンク / その他の取り外しツールについては、 削除します グループ...
➕ クリエイティブインサート:挿入 千の区切り文字 / チェックボックス / ラジオボタン / QRコード / バーコード / 複数の写真 / 詳細はこちら インセット グループ...
🔍 正確な選択: ピンポイント 特定のページ / テーブル類 / 形状 / 見出し段落 / ナビゲーションを強化する 他には? 選択 機能を使用...
⭐ スターの強化: 任意の場所に移動 / 繰り返しテキストの自動挿入 / ドキュメントウィンドウ間の切り替え / 11 変換 ツール...
最高のオフィス生産性向上ツール
Kutools for Word - Word 用の 100 以上のツール
- 🤖 Kutools AIの機能: 生成する, リライト, まとめる, 翻訳します ドキュメント / すぐに回答を得る / ポーランド語文書(保存形式)
- 📘 ドキュメントマスタリー: 分割ページ / ドキュメントをマージする / PDFへの一括変換
- ✏ コンテンツ編集: バッチ検索と置換 / すべての画像のサイズを変更する
- 🧹 楽にお掃除: 余分なスペースを削除する / セクション区切りを削除する
- ➕ クリエイティブインサート: 千単位区切り記号を挿入 / チェックボックスを挿入する / QRコードを作成する