officer (version 0.2.0)

body_remove: remove an element

Description

remove element pointed by cursor from a Word document

Usage

body_remove(x)

Arguments

x

an rdocx object

Examples

Run this code
# NOT RUN {
library(officer)
library(magrittr)

str1 <- "Lorem ipsum dolor sit amet, consectetur adipiscing elit. " %>%
  rep(20) %>% paste(collapse = "")
str2 <- "Drop that text"
str3 <- "Aenean venenatis varius elit et fermentum vivamus vehicula. " %>%
  rep(20) %>% paste(collapse = "")

my_doc <- read_docx()  %>%
  body_add_par(value = str1, style = "Normal") %>%
  body_add_par(value = str2, style = "centered") %>%
  body_add_par(value = str3, style = "Normal")

print(my_doc, target = "init_doc.docx")

my_doc <- read_docx(path = "init_doc.docx")  %>%
  cursor_reach(keyword = "that text") %>%
  body_remove()

print(my_doc, target = "result_doc.docx")
# }

Run the code above in your browser using DataCamp Workspace