发布网友 发布时间:2022-09-30 09:35
共2个回答
热心网友 时间:2024-11-26 20:36
range里面的cells都添加上工作表,例如:
oSheet1.Range(Cells(countline, 1), Cells(countline + n - 4, 4)).Value
修改为:
oSheet1.Range(oSheet1.Cells(countline, 1), oSheet1.Cells(countline + n - 4, 4)).Value
2.由于你多次建立excel.application,如果上面的赋值语句在前面的修改后还是报错(注意等号右边的range里面的两个cells也应该修改),可以使用数组作为中介赋值,例如:
arr=Range(...)
range(...)=arr
热心网友 时间:2024-11-26 20:36
这个代码您不会解决问题,哪个写的?追问只要解决报错 完成这个过程 就行,代码是有问题,还在测试改进