As taras mentioned before 'everything is possible'
. So, your summary statistics have to be in a suitable data frame, otherwise you have to prepare your summary results before your export to an excel-file (you need some coding). So back to taras example:
library(openxlsx)
library(tibble)
df <- tibble(a = c(1,2,3,5,7,8,4,3,5,7),
b = c(9,6,3,3,5,6,7,3,2,4))
df.stats <- apply(df, 2, summary)
write.xlsx(df.stats, "writeStats.xlsx", colNames = TRUE, rowNames=TRUE)