file <- system.file("extdata", "openxlsx2_example.xlsx", package = "openxlsx2")
wb <- wb_load(file)
wb$get_properties()
# Add a title to properties
wb$set_properties(title = "my title")
wb$get_properties()
Run the code above in your browser using DataLab