質問: VBA初心者です。 解決方法が分からないので、教えてください。
回答: ' objMail.Body = bodyStr メール本文は後で設定するのでコメントアウトにします。 '--- メール本文に表を貼り付け ---' Call ws.Range(tableAddress).Copy With objMail.GetInspector.WordEditor.Windows(1).Selection .TypeText bodyStr & vbCrLf .Paste End With ここでメール本文と表を一気に設定します。