使用Cells属性使用Cells属性返回一个Range对象,如下面的代码所示。#001 Sub Cell()#002 Dim icell As Integer#003 For icell = 1 To 100#004 Sheet2.Cells(icell, 1).