Change back-end to use {openxlsx2}

[matt-dray]

{openxlsx2} will replace {openxlsx} at some point, presumably? Investigate its potential, but don't integrate until CRAN release and some stability.

[matt-dray]

{openxlsx2} has continued to develop and is on CRAN, but it's still not a v1.

There's a vignette to explain some of the changes.

Consider forking {a11ytables} and creating {a11ytables2} (or complete rename) using {openxlsx2}.

[matt-dray]

A nice accessibility feature that appeared in a test of the package is that automatic cell colour is supported through wb_color(auto = "1"). Demo in a Gist.

[stanley-rudkin-dluhc]

Just to say I would find this really useful as it would mean I can use openxlsx2::wb_set_properties on a11ytables workbooks (since I think they need to be openxlsx2-native wbWorkbook objects instead of Workbook objects to use openxlsx2 functions?)

[matt-dray]

Hi Stanley, thanks for the message. Yeah, as far as I know, {openxlsx} doesn't really have an analogue for openxlsx2::wb_set_properties(), aside from the addCreator() and setLastModifiedBy() functions.

This is definitely something that we're interested in. I've been investigating {openxlsx2} in the {a11ytables2} and {yamlsheets} packages, but they're very much in development and not yet ready for release.

[stanley-rudkin-dluhc]

Thanks Matt!

Just for anyone having the same problem, I think for now you can adapt some of the commented out code from the openxlsx source code to change the creator (not just add new ones using addCreator()) by replacing strings in the wb$core object as follows:

# Set author name
excel_author_name <- "My name"

# Replace creator in workbook
wb$core <- stringi::stri_replace_all_regex(
wb$core,
pattern = "<dc:creator>(.*?)</dc:creator>",
replacement = paste0("<dc:creator>", excel_author_name, "</dc:creator>"),
)

# Also change last modified by
openxlsx::setLastModifiedBy(accessible_in_year_workbook, excel_author_name)