[vba学习]跨工作簿选择以及Range和Cells混用
Sub objtest1()
'Worksheets("sheet3").Activate
'Worksheets("Sheet3").Range(Cells(1, 1), Cells(6, 8)).Select
Dim mySheet As Object
Set mySheet = Worksheets("sheet3")
mySheet.Activate
mySheet.Range(mySheet.Cells(1, 1), mySheet.Cells(6, 8)).Select
End Sub
若要跨工作簿用Range和Cells混用方式选择单元格,则一定要标明Cells的所属,即mySheet.Cell(1,1),并要在选择单元格前先激活该工作簿:mySheet.activate
若使用注释中的方法,则会报1004错误