|
|
|
|
复制本帖HTML代码
|
高亮:
今天贴
X 昨天贴
X 前天贴
X |
把c盘file2 spreadsheet1里的一个数据表读进file1 spreadsheet1
在file1下写macro:
spreadsheet1.Cells(i, j).Formula = "='C:\[file2.xls]spreadsheet1'!" & Cells(m, n).Address
(i, j)是file1数据的位置,(m, n)是file2相对应的数据位置
很久很久没写,有点忘了,好像上述command需要file2是打开状态。。。所以可以加这么几行:
' open file2
ChDir "C:"
Workbooks.Open Filename:="C:\file2.xls"
'copy data
...
spreadsheet1.Cells(i, j).Formula = "='C:\[file2.xls]spreadsheet1'!" & Cells(m, n).Address
...
'close file2
Workbooks.Close Filename:="C:\file2.xls".
|
欢迎来到华新中文网,踊跃发帖是支持我们的最好方法! |
小白,你在哪尼。。。
|
|