我正在尝试将数据从 R 写入现有的 Excel 文件,同时保留格式。我能够按照这个问题的答案 ( Write from R into template in excel while preserving formatting ) 这样做,除了我的文件在开头包含空列,所以我不能只在单元格 A1 中开始写入数据。
作为解决方案,我希望能够找到第一个非空单元格,然后从那里开始写作。如果我运行 read.xlsx(file="myfile.xlsx")
使用 openxlsx
包,空列和空行被自动删除,只剩下数据,所以这对我不起作用。
所以我想我会先使用 wb <- loadWorkbook("file.xlsx")
加载工作表所以我可以访问 getStyles(wb)
(有效)。但是,后续命令 getTables
返回 character(0)
, 和 wb$tables
返回 NULL
.我想不通这是为什么?这些变量会告诉我第一个非空单元格,我说得对吗?
我已经尝试直接在 Excel 文件中手动删除数据前面的空列和行,但这并没有改变。我走在正确的道路上还是有不同的解决方案?
最佳答案
根据 Stéphane Laurent 的建议, 包裹 tidyxl
在这里提供完美的解决方案。
例如,我现在可以在 Excel 文件中搜索字符值,例如我感兴趣的变量名称(“Item”、“Score”和“Mean”,它们对应于 names()
的 data.frame
我想写入我的 Excel 文件):
require(tidyxl)
colnames <- c("Item","Score","Mean")
excelfile <- "FormattedSheet.xlsx"
x <- xlsx_cells(excelfile)
# Find all cells with character values: return their address (i.e., Cell) and character (i.e., Value)
chars <- x[x$data_type == "character", c("address", "character")]
starting.positions <- unlist(
chars[which(chars$character %in% colnames), "address"]
)
# returns: c(C6, D6, E6)
关于R/openxlsx/查找Excel文件中的第一个非空单元格,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/54328649/