[fml] create shared formulas

[JanMarvin]

library(openxlsx2)

df <- data.frame(
  x = 1:5,
  y = 1:5 * 2
)

wb <-  wb_workbook()$add_worksheet()$add_data(x = df)

wb$add_formula(
  x      = "=A2/B2",
  dims   = "C2:C6",
  shared = TRUE
)

wb$add_formula(
  x      = "=A$2/B$2",
  dims   = "D2:D6",
  shared = TRUE
)

if (interactive()) wb$open()

[JanMarvin]

My inspiration was this SO. Maybe you can double check @olivroy ? Just to make sure that nothing unintended happens.

This is somewhat related to #1072

[olivroy]

This looks good! I can check more thoroughly, but may be worth adding an example of this somewhere?

[JanMarvin]

You always think in the bigger picture 👍

😄 My line of thought was something like this

• hm this SO does not work
• hm I can make this work
• hm maybe this can be solved with shared strings
• oh my tiny PR looks like it's working
• darn, does not work
• why doesn't it work!
• ah, if I exclude this, it might work
• what is this enforce argument and why isn't it documented?
• gnar I have to fix this
• oh it works!
• Lets push to github, maybe Oliver knows what kind of checks are still missing

[olivroy]

Don't forget to increment version number too!