From 379b11ed7d24b787d50d847aac66663e4666336d Mon Sep 17 00:00:00 2001
From: Jan Marvin Garbuszus <jan.garbuszus@rub.de>
Date: Tue, 12 Dec 2023 23:05:35 +0100
Subject: [PATCH] [styles_across] allow passing wb_dims() to rows and cols

---
 R/class-workbook.R | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/R/class-workbook.R b/R/class-workbook.R
index 99f5d5cdc..83ed798e6 100644
--- a/R/class-workbook.R
+++ b/R/class-workbook.R
@@ -1844,6 +1844,9 @@ wbWorkbook <- R6::R6Class(
       styid <- self$get_cell_style(dims = from, sheet = sheet)
 
       if (!is.null(rows)) {
+        if (is.character(rows)) # row2int
+          rows <- as.integer(dims_to_rowcol(rows)[[2]])
+
         dims  <- wb_dims(rows, "A")
         cells <- unname(unlist(dims_to_dataframe(dims, fill = TRUE)))
         cc    <- self$worksheets[[sheet]]$sheet_data$cc