共有两个Excel档A,B
A要去读B里面某一栏的资料,然后填在A的其中一列中
目前想到的做法是组合字段及列的名称
感觉有点麻烦
想请教有没有比较有效率的写法..谢谢
ColIdxArr = Array("D","E","F","G","H","I","J","K","L","M","N","O")
RowIdxArr = Array("3","4","5","6","7","8","9","10","11","12","13","14")
For i = 0 To 11
Sheets("Sheet1").Range(ColIdxArr(i) + "4").Formula =
"='C:\Data\[File1.xls]Sheet2'!D" + RowIdxArr(i)
Next