• 締切済み

WORD改行された空白を削除したいのですが

YOUTUBEから自動書き起こしをした文章を構成したいのですが、添付のように、秒単位で改行され、小間切れになっております。 これによってできた余白をすべて削除して全文章をつなげたいのですが、置換による^pや^nでできるとあったので、試したのですがうまくいきません。 解決法御存じの方がおられましたら御教示ください。宜しくお願いいたします。

みんなの回答

  • imogasi
  • ベストアンサー率27% (4737/17069)
回答No.4

#3です。掻き洩らしましたが、 ワードの操作での、置換は https://office-hack.com/word/word-newline 等に詳しい解説があります。

TAKAKOTA
質問者

お礼

残念ながらダメでした・・ありがとうございました。

  • imogasi
  • ベストアンサー率27% (4737/17069)
回答No.3

>改行された空白を の意味が、はっきりしない、のですが。 2つ続く改行記号がある個所の2つ目の改行記号だけ削除したいのか? 例ではそうでなくて、1個の改行も、意味なくはいっているようだ。 改行を除くのは、 Word VBAですが Sub test01() ActiveDocument.StoryRanges(wdMainTextStory).Select Selection.Text = Replace(Selection.Text, vbCr, "") End Sub でカンタン。 しかしその後、日本語文章として、自然な個所へ改行を、自動的に入れ直すのは、普通のVBA程度の ユーザーでは難しい。意味論的・構文的な分析が必要であるから。 これを試行する(完全とは思えないので試行)ソフトも世の中には、出ているかもしれないが、 あるかどうかも小生は、知らない。AI的な発想になるかもしれない。 ーー 人間(質問者)がその文章を読んで、全文にわたっての中で、改行箇所に1文字の特殊記号(/や%半角?)を入れて、その後その箇所で改行する(VBAなどのプログラムで)は、プログラムは簡単。 でも元から、意味のある/や%の箇所も改行されてしまう。 例 未テスト。 Sub test02() ActiveDocument.StoryRanges(wdMainTextStory).Select Selection.Text = Replace(Selection.Text, "/", "。" & vbCrLf) End Sub

TAKAKOTA
質問者

お礼

ありがとうございました。

  • aokii
  • ベストアンサー率23% (5210/22062)
回答No.2

置換→オプション→チェックを外す(あいまい検索)→^p^p(検索する文字列)→^p(置換小後の文字列)→全て置換

TAKAKOTA
質問者

お礼

残念ながらダメでした。 ともあれありがとうございました。

  • hiro_1116
  • ベストアンサー率30% (2555/8267)
回答No.1

既に試された方法と同じかもしれませんが、下記を参考になさってください。 https://faq.nec-lavie.jp/qasearch/1007/app/servlet/relatedqa?QID=012404 これで上手くいかないなら、どのように上手くいかないのかを説明してくださると、より適切な回答が得られやすいと思います。

TAKAKOTA
質問者

お礼

残念ながらダメでした。 ともあれありがとうございました。

関連するQ&A