2

我正在尝试将数据从 R 写入现有的 Excel 文件，同时保留格式。我可以按照这个问题的答案（在保留格式的同时从 R 写入 excel 中的模板）这样做，除了我的文件在开头包含空列，所以我不能只是开始在单元格 A1 处写入数据。

作为一种解决方案，我希望能够找到第一个非空单元格，然后从那里开始写作。如果我read.xlsx(file="myfile.xlsx")使用openxlsx包运行，空的列和行会被自动删除，只剩下数据，所以这对我不起作用。

所以我想我会先加载工作表，wb <- loadWorkbook("file.xlsx")这样我就可以访问getStyles(wb)（哪个有效）。但是，随后的命令getTables返回character(0)，并wb$tables返回NULL。我想不通这是为什么？我是对的，这些变量会告诉我第一个非空单元格吗？

我尝试直接在 Excel 文件中手动删除数据前面的空列和行，但这并没有改变。我是在正确的道路上还是有不同的解决方案？

4

1 回答 1

0

正如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)
于 2019-01-24T12:58:10.703 回答