Execl sheet1 复制问题

vb.net
我想再打开
 excelXLS = CreateObject("Excel.Application")
        excelWK = excelXLS.Workbooks.Open(strFieldName)
 excelWS = excelWK.Worksheets(1)
写个循环 循环的长度有多少 就吧sheet1 复制多少 
问下 代码怎么写 sheet1 复制到sheet2 全部复制的是否写起来简单些？ VB.NET --------------------编程问答-------------------- sheet1.usecell.copy()
sheet2.paste() --------------------编程问答-------------------- 上面答案错了，应该是
sheet1.UsedRange.copy()
sheet2.paste()

补充：.NET技术 ,  VB.NET