# NOT RUN {
## Create a new workbook
wb <- loadWorkbook(file = system.file("extdata", "loadExample.xlsx", package = "openxlsx"))
## remove column widths in columns 1 to 20
removeColWidths(wb, 1, cols = 1:20)
# }
# NOT RUN {
saveWorkbook(wb, "removeColWidthsExample.xlsx", overwrite = TRUE)
# }
Run the code above in your browser using DataLab