admin 管理员组

文章数量: 1087139


2024年4月30日发(作者:八位二进制计算器)

在wincc 中怎么做才能把报表生成按日期的Excel 文件

VBS脚本实现,就是把文件名称以变量的形式表示。参考

'关闭保存

Dim patch,filename

filename=CStr(Year(Now))&CStr(Month(Now))&CStr(Day(Now))&CStr(Hour(N

ow))+CStr(Minute(Now))&CStr(Second(Now))

patch= "d:"&filename&""

patch

Set objExcelApp= Nothing

对于Excel报表,用VBS最灵活,Excel 定义好格式后wincc来填空,平均累计值就

用Excel 的功能。

Dim excelapp

Dim aa,bb,cc

Set excelapp = CreateObject("ation")

Set aa = ("tag1")

e = False'True

"D:"

bb = Now 'getcurrent_datetime()

MsgBox CStr(bb)

(1,1).value = "rrrrrr"'111111

(1,2).value = CStr(bb)

(2,2).value = CStr()

(3,2).value = CInt()

(4,2).value = CSng()


本文标签: 形式 格式 填空 文件名称 表示