(実際にはExcelのVBAからWordファイルを開いての処理になるのでExcelのVBAで組んでいますが、)
WordのVBAで、置換処理を作成しています。
keyword1 = "検索文字"
keyword2 = "置換文字"
With objSelection.Find
.Text = keyword1
.Forward = True
.MatchWholeWord = True
.Replacement.Text = keyword2
.Execute Replace:=wdReplaceAll
End With
置換処理自体は出来ています。上記処理は置換部分の抜粋です。
しかし行いたいことはタイトルにもあります通り、置換文字中に改行を含めた状態での置換処理です。
長い文字列を置換するだけなら問題ないのですが、改行を含めてしまうと改行文字が別の文字に置き換えられてしまうようです。
置換先でも改行された状態にしたいのですが、これは書き方に問題があるのでしょうか?
もしくは置換処理ではなく、他の方法を取る必要があるのでしょうか?
教えてください。よろしくお願いいたします。
No.1ベストアンサー
- 回答日時:
こんにちは。
>長い文字列を置換するだけなら問題ないのですが、改行を含めてしまうと改行文字が別の文字に置き換えられてしまうようです。
質問の「WordVBA 行の削除」で、偶然に書いたのですが、改行コードの問題で、Excel側は、セルにvbLF が入っているはずですから、
一旦取得した、置換文字を、以下のようにして
keyword2 = Replace(keyword2, vbLf, Chr(11), , , vbBinaryCompare)
置換すればよいのではありませんか?
ちなみに、これが入っているWordテーブルのセルの中で、改行コードの種類が確認できれば、「WordVBA 行の削除」のVBAのほうも可能です。Paragraph 自体の変更はありません。
回答、ありがとうございます!
他の質問でもお世話になっています。
提示していただいたサンプルを実行してみたところ、見事に成功しました。
ありがとうございました!
それでは「行の削除」のほうも確認してみます。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) Excel VBA 教えてください。 VBA初心者です。 詳しい方がいましたら教えてください。 下記 3 2023/04/25 11:22
- Visual Basic(VBA) EXCEL VBA 単語置き換え について質問です ブック名 ぶぶぶ シート名 ししし セル V3〜 3 2023/03/08 01:41
- Visual Basic(VBA) Excel VBAでAA(BBB) → BBB.AA に置換したい 2 2022/10/30 13:59
- Visual Basic(VBA) EXCEL VBAで教えてください。 1 2022/12/22 04:20
- PHP PHP・Wordpress preg_replaceを条件分岐で処理させる方法が知りたい 1 2023/05/01 14:25
- Excel(エクセル) Excelの複数置換はSUBSTITUTEを重ねるしかない? 9 2022/05/08 11:25
- その他(コンピューター・テクノロジー) 正規表現の置換で一部の文字列をそのまま残したい 2 2022/05/03 19:19
- Visual Basic(VBA) 特定の文字を簡単な操作で半角スペースに変換するか削除したい 2 2022/11/01 10:35
- Excel(エクセル) 数式の置換がうまく行かない 6 2022/05/04 15:51
- Ruby power BI クエリエディター 〇〇を含む文字列置換 1 2022/10/16 17:34
このQ&Aを見た人はこんなQ&Aも見ています
-
プロが教えるわが家の防犯対策術!
ホームセキュリティのプロが、家庭の防犯対策を真剣に考える 2組のご夫婦へ実際の防犯対策術をご紹介!どうすれば家と家族を守れるのかを教えます!
-
EXCEL VBAにて、WORDへ置換
Word(ワード)
-
ExcelからVBAでWordを操作する際に、困っています。
Visual Basic(VBA)
-
実行時エラー´5854´ 文字列型パラメーターが長すぎます。
Visual Basic(VBA)
-
-
4
文字列からタブコードを取り除きたい
Visual Basic(VBA)
-
5
word置換で改行は置換できますか?
その他(Microsoft Office)
-
6
【VBA】特定シート 名前編集・削除を禁止したい
Excel(エクセル)
-
7
Excelからワード文書の文字置換を実行する(ワードでのマクロも)
Word(ワード)
-
8
VBAで文章を指定の文字数で改行コードを挿入したい
その他(Microsoft Office)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
テキストファイルで改行に置換...
-
ワードにて スペースを全て改行...
-
置換でピリオドを一括削除出来...
-
【Word】全ての改行を削除
-
空白スペースをタブに置換する方法
-
正規表現の置換で数値のみを抽...
-
ワイルドカード検索・置換対応...
-
秀丸エディタで改行を削除する...
-
ワードで各行の先頭に文字列を...
-
秀丸で指定した文字が入ってい...
-
ワード 置換で空白行をなくす...
-
NotePad++ 改行された文を改行...
-
特定の文字を含む行だけ抽出す...
-
サクラエディタで連続改行を処...
-
テキストに縦に並んでいるデー...
-
LibreOfficeのWriterで特定の文...
-
マクロン(¯)とキャメロン(ˇ)に...
-
「ドゥ」の簡単なローマ字入力方法
-
Google form グーグルフォーム...
-
1MBでドレくらいの文章を書くこ...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
テキストファイルで改行に置換...
-
ワードにて スペースを全て改行...
-
特定の文字を含む行だけ抽出す...
-
Accessでの置換
-
置換でピリオドを一括削除出来...
-
空白スペースをタブに置換する方法
-
正規表現の置換で数値のみを抽...
-
サクラエディタで連続改行を処...
-
WordVBA 置換処理での改行文字...
-
テキストに縦に並んでいるデー...
-
文字+改行コードの置換について
-
秀丸で指定した文字が入ってい...
-
テキスト内で括弧内の文字を削除
-
秀丸の正規表現で文字列を切り...
-
CSVファイルをエクセルで開いた...
-
秀丸の置換で数字で始まる行だ...
-
ワード2010 ひらがな 削除
-
秀丸で改行コード"[CR]"を変換...
-
NotePad++ 改行された文を改行...
-
秀丸エディタで改行を削除する...
おすすめ情報