Адресация и управление текстом в текстовом поле и нижнем колонтитуле в документах Word с помощью пакета R Officer

Я работаю над решением изменить текст в нескольких документах Word с аналогичной структурой. Позиции текста, которые я хочу изменить: 1. в текстовом поле, относящемся к верхнему / нижнему колонтитулу, и вторым в первом нижнем колонтитуле. Я не знаю, как адресовать текст внутри этих элементов? Это вообще возможно? Изображение этого документа Вот мой пример:

library(officer)
library(magrittr)

docact <- read_docx("PATH/officertest/textfieldfooter.docx")

docx_summary(docact)

doc_index content_type style_name уровень текста num_id 1 1 абзац NA Вот еще один текст, который легко обрабатывать и манипулировать им. NA NA

cursor_reach(docact, keyword = "I want to address this textfield") %>%
  slip_in_text("This is the text that I want to add ", pos = "after", style = "Default Paragraph Font")

выдает ошибку: я хочу указать, что это текстовое поле не найдено в документе

headers_replace_all_text(docact, "footertext", "the text that should be the replacement",
         only_at_cursor = FALSE,
         warn = TRUE)

Предупреждающие сообщения: 1: в заголовке $ replace_all_text (old_value, new_value, only_at_cursor,: найдено 0 экземпляров 'footertext' в документе. 2: В заголовке $ replace_all_text (old_value, new_value, only_at_cursor,: найдено 0 экземпляров 'footertext' в документ. 3: В заголовке $ replace_all_text (old_value, new_value, only_at_cursor,: найдено 0 экземпляров 'footertext' в документе.


person J Falke    schedule 30.05.2018    source источник


Ответы (1)


Думаю, вам нужна эта функция в пакете офицера:

docact <- footers_replace_all_text(docact,"old_value","new_value")

Замена текста в текстовом поле у ​​меня пока не работала

person Lennart Jongen    schedule 22.11.2019