[[20221214175854]]　『Word VBAで編集したデータをOutlookメールに挿入ａx（おはよう世界）　ページの最後に飛ぶ

『Word VBAで編集したデータをOutlookメールに挿入すると改行される理由を知りたい。』（おはよう世界）

目的：エクセルから任意の表、企業名、担当者などを抽出し、メーカーに見積もりメールを作成したい。

メールアイテムをWordEditor経由で編集しています。
わかりにくいのですが、オブジェクトでセル上のメール本文を指定した後、(下記抜粋のように)文字を検索し、置換したものをメール本文としています。
この際、出来上がったメール文が、挿入した箇所で改行されます。

例)
現行
〇〇株式会社

△△様

正解
〇〇株式会社
△△様

上記の改行しないようにする、または、除去する方法ございますでしょうか。
当方、初心者のため不足している情報ありましたらご教示願います。

    Set Tb(1) = sh1.Range("A1")
    Set Tb(2) = sh1.Range("A2")
    Set Tb(3) = sh1.Range("A3")
    Set Tb(4) = sh1.Range("A4")

    ReDim PastePos(1 To 4)
    PastePos(1) = "＜表＞"
    PastePos(2) = "＜ユーザー情報＞"
    PastePos(3) = "＜企業名＞"
    PastePos(4) = "＜担当者＞"
  　
　　Tb(i).Copy 
    Set objWRG = .GetInspector.WordEditor.Range(0, 0)
　　'対象位置の文字列を選択します。
     objWRG.Find.Text = PastePos(i)
     objWRG.Find.Execute

＜使用 Excel：Microsoft365、使用 OS：Windows10 ＞

 pタグとbrタグの違いだったりして...?

メール一般
http://yytomy.sakura.ne.jp/mail/outlook.html

 まあ、対処法まで知らないからどうでもいい情報ですネ。スマセン... ^^;

（白茶） 2022/12/14(水) 19:00:09

ご回答頂き、ありがとうございます。とても参考になりました。
送信形式の違いなんですね。段落、改行の違いが表になってい
て、理解しやすく助かりました。
BodyFormatを変えたり、改行を考慮した文を作成して改善します。
ありがとうございますした。
（おはよう世界） 2022/12/15(木) 10:21:00

コメント返信：

[ 一覧(最新更新順) ]

[[20221214175854]] 『Word VBAで編集したデータをOutlookメールに挿入ａx（おはよう世界） ページの最後に飛ぶ

[[20221214175854]]　『Word VBAで編集したデータをOutlookメールに挿入ａx（おはよう世界）　ページの最後に飛ぶ