fix warning message. closes #700

JanMarvin · Jul 20, 2023 · ba6c2c0 · ba6c2c0
1 parent cda0a8e
commit ba6c2c0
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/class-workbook.R b/R/class-workbook.R
@@ -3914,7 +3914,7 @@ wbWorkbook <- R6::R6Class(
 
       type <- match.arg(type)
 
-      if (length(cols) > 2)
+      if (length(cols) > 2 && any(diff(cols) != 1))
         warning("cols > 2, will create range from min to max.")
 
       ## rows and cols