如何依次打开并关闭多个连续excel文件？（已解决）
本帖最后由 32714107 于 2012-6-5 14:58 编辑有多个excel文件，序号从1到200，里面的内容改的大都一样。怎么设置一个脚本，依次打开并修改后关闭excel文件啊。
我知道
run("explorer.exe /e,G:\excls\1.xls")
这个可以打开一个excel文件，想把1用一个变量代替，但提示找不到文件。
上面是用资源管理器打开文件。
我是新手，希望高手多多指教！ 本帖最后由 kevinch 于 2012-5-31 20:37 编辑
If ProcessExists("excel.exe") Then
$excel=ObjGet("","excel.application")
Else
$excel=ObjCreate("excel.application")
EndIf
$excel.visible=True
For $n=1 To 200
If FileExists("G:\excls\"&$n&".xls")=1 Then
$wb=$excel.workbooks.open("G:\excls\"&$n&".xls")
;------修改的代码写这段里------
$wb.activesheet.range("a1").value="test"
;------------------------------
$wb.close(true)
EndIf
Next看一下，感觉路径名拼写错了吧 学习2楼的代码了，感谢！ 谢谢2楼的回答!一鞠躬！
页:
[1]