Add print area

[JanMarvin]

Following the research done in ycphs/openxlsx#412, it is possible to define custom print areas in openxlsx2:

library(openxlsx2)
wb <- wb_workbook()$
  add_worksheet()$
  add_data(x = iris)$
  add_named_region(
    dims = "A1:C10",
    name = "_xlnm.Print_Area",
    local_sheet = 0
  )$page_setup(
    orientation = "landscape",
    scale = 50
  )

if (interactive()) wb$open()