Is it possible to write a new workbook based by an existing workbook with openxlsx

Question

Here is to create a new Workbook, I create 2 blank sheets:

library(openxlsx)
wb <- createWorkbook()
headercol <- createStyle(halign = "left", textDecoration = "bold")
addWorksheet(wb, sheetName = "Report1")
addWorksheet(wb, sheetName = "Report2")

And now I loaded another workbook which have its own content:

lb <- loadWorkbook(file.choose())

I wanted to copy the content of lb sheet to my "Report2" sheets.. is this possible to do? Thank You