Imports IronXL

Dim firstBook As WorkBook = WorkBook.Load("sample.xlsx")
Dim secondBook As WorkBook = WorkBook.Create()

' Select first worksheet in the workbook
Dim workSheet As WorkSheet = firstBook.DefaultWorkSheet

' Duplicate the worksheet to the same workbook
workSheet.CopySheet("Copied Sheet")

' Duplicate the worksheet to another workbook with the specified name
workSheet.CopyTo(secondBook, "Copied Sheet")

firstBook.Save()
secondBook.SaveAs("copyExcelWorksheet.xlsx")