excel中VBA编程中怎么引用其他单元格的数据。

Question

总是显示在 Cells(2, 5) = 数据区!cell(5, 8) & 数据区!cell(5, 18 + j)出错。我想把同一工作表中的“数据区”工作薄中的cell(5, 8) 以及cell(5, 18 + j)单元格的数据引用到活动工作表中的Cells(2, 5)单元格。cell(5, 18 + j)单元格是每循环一次都要变动一下单元格向下移一个，不知道这样定义单元格是否可以，也不清楚语法，请帮忙指点一下。
Sub copyworks()

Application.ScreenUpdating = False
b = Sheets.Count
Dim j As Long
j = 1

For i = b To 3 Step -1
Sheets("标准高程模型表").Select
Cells.Select
Selection.Copy
Sheets(i).Select
ActiveSheet.Paste
Range("G2:G3").Select
Selection.Font.ColorIndex = 2
Cells(2, 5) = 数据区!cell(5, 8) & 数据区!cell(5, 18 + j)
j = j + 1
Next

Answer 1

Cells(2, 5) = sheets("数据区").cell(5, 8) & sheets("数据区").cell(5, 18 + j)

试下追问

还是在Cells(2, 5) = sheets("数据区").cell(5, 8) & sheets("数据区").cell(5, 18 + j)显示出错

追答

你意思
把E2单元格的数据，依次复制到到其他单元格，但顺序排列？