library(RDCOMClient)
e = COMCreate("Excel.Application")
e[["Workbooks"]]$Add()
wks = e[["Worksheets"]]
e[["Visible"]] = TRUE
#wks$Add(After=as.integer(2))
wks$Add(Count=as.integer(3))
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.