3

RDCOMClinet パッケージで Excel ファイルを Outlook に添付できます。しかし、Rでメール本文にExcelワークシートの内容を表示するにはどうすればよいですか? テーブルとグラフがワークシートに含まれているとします。

library(RDCOMClient)
## init com api
OutApp <- COMCreate("Outlook.Application")
## create an email
outMail = OutApp$CreateItem(0)

## configure  email parameter
outMail[["To"]] = "name@email.com"
outMail[["subject"]] = paste0("Report ", Sys.Date() - 1)

# attach a file via its directory
dirs <- dir(getwd(), full.names = TRUE)
outMail[["Attachments"]]$Add(dirs)

# insert an excel worksheet from attachment or local drive
outMail[["HTMLBody"]] = ?
4

1 に答える 1

4

テーブル部分の場合、たとえば次のことができます

library(RDCOMClient)
library(openxlsx)
library(xtable)

OutApp <- COMCreate("Outlook.Application")
outMail = OutApp$CreateItem(0)
outMail[["To"]] = "ex@example.com"
outMail[["subject"]] = paste0("Report ", Sys.Date() - 1)

wb <- createWorkbook()
addWorksheet(wb, "S1")
writeDataTable(wb, "S1", x = head(iris))
saveWorkbook(wb, tf <- tempfile(fileext = "xlsx"))
df <- read.xlsx(tf)
df_html <- print(xtable(df), type="html", print.results=FALSE)

outMail[["Attachments"]]$Add(tf)
outMail[["HTMLBody"]] = sprintf('
Hello world, here is the table:
%s
Merry Christmas & a happy New Year!
', df_html) # add your html message content here
outMail$Send()

ここに画像の説明を入力

チャート部分のオプションがわかりません。Excel のグラフを Outlook の電子メールに埋め込んで、結果の HTML を調べてみませんか?

于 2016-12-22T14:54:18.063 に答える