保留单元格格式删除Excel列：openxlsx删除后列仍存在的问题

你之前用deleteData()函数的问题在于，它只是清空指定单元格的内容，并不会真正移除整列。要彻底删掉第2列同时保留单元格格式，得用openxlsx包的deleteColumns()函数——这个函数专门用来移除整列，还能通过参数保留原有格式。

完整代码示例：

library(openxlsx)

# 加载目标Excel工作簿
wkbook <- loadWorkbook(file = "data.xlsx")
# 彻底删除第2列，开启格式保留
deleteColumns(wkbook, sheet = 1, cols = 2, keepStyles = TRUE)
# 保存修改后的文件
saveWorkbook(wkbook, "data2.xlsx", overwrite = TRUE)

关键说明：

• deleteColumns()是真正移除整列，而非仅清空单元格内容
• keepStyles = TRUE参数确保剩余单元格的颜色等格式完全保留
• 无需指定rows范围，函数会自动处理整列的所有内容

内容的提问来源于stack exchange，提问作者DudaR