Copy a Word document that has text and pictures into the body of an - Microsoft Community
i writing vba code to open word document, make body of outlook message , send list of addresses in excel file. put button on excel spreadsheet , put the code see below into "on click". it works far sending out messages text word document, fails include picture . how can code put in complete contents of word document? private sub commandbutton1_click() dim outapp object dim outmail object dim integer dim greeting string myfname = "c:\users\wayne\desktop\testfile.docx" set wordapp = createobject("word.application") set worddoc = wordapp.documents.open(myfname, , true) body = worddoc.content worddoc.close ' close document wordapp.quit ' close word application set wrddoc = nothing set wrdapp = nothing if cells(1, 5) = "" then cells(1, 5).interior.colorindex = 3 msgbox "error -- not have subject line in cell e1" cells(1, 5).interior.colorindex = 0 exit sub e...