在不打开EXCEL文件的前提下读取数据方法一_excel vba-excel宏-excel编程-excel代码-excel源码

当前位置：主页 > 技巧 > Excel技巧 > 编程 > 正文

在不打开EXCEL文件的前提下读取数据方法一

时间：2004-09-21 16:02 来源：本站原创作者：tanjh 阅读：次

比如读取D:\税金.xls中sheet1中A1:B20的数据

dim i as integer

application.screenupdating=false

for i=1 to 20

activesheet.cells(i,1).formula='D:\[税金.xls]sheet1'!$A$" & i

activesheet.cells(i,2).formula='D:\[税金.xls]sheet1'!$B$" & i

next i

activesheet.range("a1").currentregion.copy

activesheet.range("a1").PasteSpecial xlPasteValues

Application.CutCopyMode = False

application.screenupdating=true

运行一下后，发现速度比打开、读取、关闭要快多了。特与大家分享。

(责任编辑：admin)

顶一下

(0)

踩一下

(0)