excel - VBA Email with pasted chart and text in body -


the goal of following code paste selected chart email body below text. however, continues paste above text. how can change make paste below? thanks!

set outapp = createobject("outlook.application") set outmail = outapp.createitem(0) outmail     .cc = "xyz@anc.com"     .bcc = "abc@xyz.com"     .subject = "test"     .body = "dear" & "macro "      activesheet.range("p36:x46").copy     set weditor = outapp.activeinspector.wordeditor      weditor.application.selection.paste  .display 

change selection start , end. adding line break might idea. should use mailitem.getinspector instead of application.activeinspector since message not yet displayed.

set outapp = createobject("outlook.application") set outmail = outapp.createitem(0) outmail     .cc = "xyz@anc.com"     .bcc = "abc@xyz.com"     .subject = "test"     .body = "dear" & "macro " & vbcrlf      activesheet.range("p36:x46").copy     set vinspector = outmail.getinspector     set weditor = vinspector.wordeditor      weditor.application.selection.start = len(.body)     weditor.application.selection.end = weditor.application.selection.start      weditor.application.selection.paste  .display 

Comments

Popular posts from this blog

timeout - Handshake_timeout on RabbitMQ using python and pika from remote vm -

gcc - MinGW's ld cannot perform PE operations on non PE output file -

c# - Search and Add Comment with OpenXML for Word -