病毒专收员 发表于 2011-7-30 10:53:23

请教，如何打印Excel电子表格呢？[已解决]

本帖最后由 病毒专收员 于 2011-8-1 13:28 编辑

如何打印指定 Excel电子表格内所有内容呢？

kevinch 发表于 2011-10-21 19:35:22

本帖最后由 kevinch 于 2011-10-21 19:59 编辑

打印指定工作表$o_Workbook=objget(excel文件全路径名)
$o_Workbook.worksheets("工作表名").printout
$o_Workbook.close(false)打印指定工作表B2:E10区域$o_Workbook=objget(excel文件全路径名)
with $o_Workbook.worksheets("工作表名")
    .pagesetup.printarea="B2:E10"
    .printout
    .pagesetup.printarea=""
endwith
$o_Workbook.close(false)以上代码试下

kevinch 发表于 2011-7-30 22:08:22

$o_Workbook=objget(excel文件全路径名)
for $o_WS in $o_Workbook.worksheets
    $o_WS.printout
next
$o_Workbook.close(false)这个可以测试下，不对的话你发上你写的代码我再测试。

喀喇喀喇 发表于 2011-7-31 15:15:30

楼上代码测试没有问题，呵呵

病毒专收员 发表于 2011-8-1 13:28:40

回复 2# kevinch


    感谢帮助~~

koflion 发表于 2011-9-10 01:50:57

记号。。。学习了

txbihai 发表于 2011-10-21 08:25:36

回复 2# kevinch


你好！
　　如何打印一个工作表或选定内容。

zhuxxpt 发表于 2011-11-1 11:41:34

好办法，谢谢提供

hondaw 发表于 2012-2-19 15:41:05

学习！学习！
谢谢啦!

zxxputian4 发表于 2012-2-20 11:02:54

好办法，谢谢共享

nian_jin 发表于 2012-3-21 23:47:50

拿来用用,以学到了..

fastidium 发表于 2012-3-29 10:30:16

非常牛！！学习，谢谢。

ndyzx 发表于 2012-6-28 22:38:22

回复 7# kevinch
来学习了，谢谢楼主。

chzj589 发表于 2012-7-22 22:08:47

回复 7# kevinch

谢谢!学习了{:face (355):}

那片叶子 发表于 2012-8-25 16:10:13

来学习了，谢谢楼主。
页: [1] 2
查看完整版本: 请教，如何打印Excel电子表格呢？[已解决]