[已解决]请教一个Excel修改后另存的问题
本帖最后由 waxy 于 2012-2-28 17:05 编辑我想请教一个关于Excel修改后另存的问题，如我们把Excel表格中的坐标为3,8位置的内容改成$i（$i是个变量）打印出来，
打印出来后并以变量$i作为文件名另存在一个指定的地方。以下代码能实现打印但另存的文档是空的没有内容，不知道怎么
回事，请高手帮我看一下，谢谢！#RequireAdmin
#include <String.au3>
#Include <EXCEL.au3>
Local $oExcel = _ExcelBookNew(0)
$o_Workbook=objget(@ScriptDir &"\test.xls")
$i=100
with $o_Workbook.worksheets("Sheet1")
.cells(3,8)=$i
.printout
endwith
_ExcelBookSaveAs($oExcel, @ScriptDir & "\"&$i&".xls" , "xls", 0, 1)
_ExcelBookClose($oExcel, 1, 0)
$o_Workbook.close(false) 本帖最后由 kevinch 于 2012-2-28 16:11 编辑
修改了$o_workbook却保存的是$oExcel，楼主搞混了吧
而且objget得到的项目之前用vba测试似乎是不能修改的，只有把进程的visible设置为true才可以进行保存，如果要进行修改及保存不提倡用objget的方式，最好是objcreate创建个excel进程，你可以把visible设置为false，然后进行操作，就正常了 修改了$o_workbook却保存的是$oExcel，楼主搞混了吧
而且objget得到的项目之前用vba测试似乎是不能修改的， ...
kevinch 发表于 2012-2-28 16:09 http://www.autoitx.com/images/common/back.gif
谢谢！我是想改好之后，原表保不保存没有关系，只是想修改好的表格另存一下。所以就想到保存所有工作表即$oExcel。
你后面说的那些我不太明白，能不能帮我改一下，谢谢！ 回复 2# kevinch
其实现在这个代码打印出来的内容已正常的了（修改OK的），只是另存的表格确是个空表。 #Include <EXCEL.au3>
Local $oExcel = _ExcelBookOpen(@ScriptDir &"\test.xls", 0)
$i=100
with $oExcel.worksheets("Sheet1")
.cells(3,8)=$i
.printout
endwith
_ExcelBookSaveAs($oExcel, @ScriptDir & "\"&$i&".xls" , "xls", 0, 1)
_ExcelBookClose($oExcel, 1, 0) #Include
Local $oExcel = _ExcelBookOpen(@ScriptDir &"\test.xls", 0)
$i=100
with $oExcel.workshee ...
smartzbs 发表于 2012-2-28 16:48 http://www.autoitx.com/images/common/back.gif
谢谢！太感谢了，我现在算有点是明白kevinch说的objget了，谢谢两位。 #Include
Local $oExcel = _ExcelBookOpen(@ScriptDir &"\test.xls", 0)
$i=100
with $oExcel.workshee ...
smartzbs 发表于 2012-2-28 16:48 http://www.autoitx.com/images/common/back.gif
谢谢！我想进一步问题问两个问题：
1. 如我想把另存的文件存到另外一台电脑的E：\file中，要怎么写（比如另一台机的IP为196.168.1.100）
2.变量$i通过ini文件来获得，ini文件也在196.168.1.100的E：\file，想知道怎么连到目标机器上并读到ini配置文件？
非常感谢！ 试一下这样引用
\\196.168.1.100\e$\file
页:
[1]