VBA菜鸟,编写的时候遇到的问题,还请高手告知,谢谢!!
1,Range的用法问题。
在sheet1页面里面操作(sheet1 是active页),但是需要把sheet2里面单元格的内容复制过来,range用法报错。到底应该怎么用才对。
见下:
Sheets("sheet1").Select
...................
...................
Worksheets("sheet2").range(cells(i,1),cells(j,1)).select
Selection.Copy
range(cells(1,1)).select
ActiveSheet.Paste
2.WorksheetFunction.Sum用法问题。
在sheet1页面里面操作(sheet1 是active页),需要把sheet2里面的Cells(i,5)到Cells(i,9)的数值加总。
但是不知道怎么做(尝试WorksheetFunction.Sum(Range(sheets("sheet2").Cells(i, 5), sheets("sheet2").Cells(i, 8))) 报错)
以下是不得已只能一个一个加得到的结果。
Cells(i, 9).Value = WorksheetFunction.Sum(Range(Cells(i, 5), Cells(i, 8))) + Sheets("sheet2
").Cells(i, 5).Value + Sheets("sheet2").Cells(i, 6).Value + Sheets("sheet2").Cells(i, 7).Value + Sheets("sheet2").Cells(i, 8).Value + Sheets("sheet2").Cells(i, 9).Value