找回密码
 加入
搜索
查看: 3364|回复: 8

[GUI管理] 求助EXCEL表写入内容后再打印出来

  [复制链接]
发表于 2011-10-21 10:19:29 | 显示全部楼层 |阅读模式
各大侠:
下面的例子是打印工作表,当前表的内容。
如何改为先把变量写到工作表2再打印工作表2
$o_Workbook=objget("d:\dbd\gbb.xls")
    $o_Workbook.activesheet.printout
$o_Workbook.close(false)
发表于 2011-10-21 19:02:33 | 显示全部楼层
没看明白。
发表于 2011-10-21 19:57:36 | 显示全部楼层
$o_Workbook=objget("d:\dbd\gbb.xls")
    $i=100
    with $o_Workbook.worksheets("工作表二")
        .range("B2")=$i
        .printout
    endwith
$o_Workbook.close(false)
这样试下

评分

参与人数 1贡献 +5 收起 理由
lynfr8 + 5

查看全部评分

发表于 2011-10-22 18:01:39 | 显示全部楼层
#include <Excel.au3>.
_ExcelWriteArray 数组元素值写入指定 Excel 对象活动表上的行或列.
_ExcelWriteCell 将信息写入指定 Excel 对象的活动工作表单元格.

也可以先用Excel.UDF写入数据后再调用楼主的打印代码
 楼主| 发表于 2011-10-25 10:44:34 | 显示全部楼层
谢谢!
我试过打印不出来:
+>10:45:12 AU3Check 完成[CODE]:0
>运行:(3.3.6.1):D:\autoit3\autoit3.exe "D:\autoit3\Examples\Helpfile\GUICtrlCreateButton.au3"   
D:\autoit3\Examples\Helpfile\GUICtrlCreateButton.au3 (4) : ==> ??????(?????).:
.range("B2")=$i
.range("B2")=$i^ ERROR
->10:45:14 AutoIT3.exe 完成:[CODE]:1
 楼主| 发表于 2011-10-25 16:08:25 | 显示全部楼层
就这句行动时出问题:
.range("B2")=$i
改为:.cells(2,2)=$i
运行通过,但内容没保存,还要请教如何保存?
发表于 2011-11-1 11:41:03 | 显示全部楼层
好源码,谢谢楼主提供
发表于 2011-11-1 12:06:00 | 显示全部楼层
_ExcelBookSave($oExcel [, $fAlerts = 0])保存

_ExcelBookSaveAs($oExcel, @ScriptDir & "\SaveAsExample", "xls")  另存

打印看这个
http://www.autoitx.com/forum.php?mod=viewthread&tid=8447
发表于 2011-11-1 21:55:21 | 显示全部楼层
$o_Workbook=objget("d:\dbd\gbb.xls")
    $i=100
    with $o_Workbook.worksheets("工作表二")
        .cells(2,2)=$i
        .printout
    endwith
$o_Workbook.close(true)
保存
您需要登录后才可以回帖 登录 | 加入

本版积分规则

QQ|手机版|小黑屋|AUTOIT CN ( 鲁ICP备19019924号-1 )谷歌 百度

GMT+8, 2024-6-17 07:34 , Processed in 0.088930 second(s), 28 queries .

Powered by Discuz! X3.5 Licensed

© 2001-2024 Discuz! Team.

快速回复 返回顶部 返回列表