# NOT RUN {
library(flextable)
ft_mtcars <- flextable(mtcars)
ft_iris <- flextable(iris)
FT <- list(ft_mtcars=ft_mtcars,ft_iris=ft_iris)
body_add_flextables(
paste(examplePath(),'templates/templateFT.docx',sep = ''),
paste(tempdir(),'/resultFT.docx',sep = ''),
FT)
# }
Run the code above in your browser using DataLab