回复:在wincc按钮实现打印已存在的excel报表

bchjy

  • 帖子

    63
  • 精华

    0
  • 被关注

    2

论坛等级:游士

注册时间:2005-09-13

普通 普通 如何晋级?

发布于 2010-11-26 14:16:24

1楼

Dim objExcelApp
Dim FileName
FileName="D:\baobiao\test.xls"
Set objExcelApp=CreateObject("Excel.Application")
objExcelApp.Visible=False
objExcelApp.Workbooks.Open FileName
objExcelApp.ActiveWorkbook.PrintOut()
objExcelApp.Workbooks.Close()
objExcelApp.Quit()
简单一点
评论
编辑推荐: 关闭

请填写推广理由:

本版热门话题

SIMATIC WinCC / Panel

共有32574条技术帖

相关推荐

热门标签

相关帖子推荐

guzhang

恭喜,你发布的帖子

评为精华帖!

快扫描右侧二维码晒一晒吧!

再发帖或跟帖交流2条,就能晋升VIP啦!开启更多专属权限!

  • 分享

  • 只看
    楼主

top
您收到0封站内信:
×
×
信息提示
很抱歉!您所访问的页面不存在,或网址发生了变化,请稍后再试。