大师：请问如下代码有时会报错？
Dim App As New MSExcel.Application
Dim Wb As MSExcel.WorkBook =
App.WorkBooks.Open("D:\Report.xls")
Dim Ws As MSExcel.WorkSheet =
Wb.WorkSheets(1)
Dim Rg As MSExcel.Range =
Ws.Range("B1:C4")
Rg.copy
而下一段不会报错？
Dim App As New MSExcel.Application
Dim Wb As MSExcel.WorkBook = App.WorkBooks.Open("D:\Report.xls")
Dim Ws As MSExcel.WorkSheet = Wb.WorkSheets(1)
Dim Rg As MSExcel.Range = Ws.Range("B1:C4")
rg.select
Rg.copy
加好友 
发短信
Post By：2021/10/20 10:36:00 [只看该作者]
