小弟在利用EXCEL在做报表，基本已经实现0:00对23：00每小时记录一次数据。但是业主要求当班报表对应为8：00对8:00.我通过改动程序，发现程序中存在一个问题，请各位指教：我写的程序在23：00到0:00变化时，9点到23点数据全部清零，8点时候保存的数据只有0：00对8：00的。
现将程序贴在后面，供大家讨论：
问题补充：
Option Explicit
Function action
Dim objExcelAPP
Dim reportfile
Dim reportfile1
Dim reporttime
Dim index
Dim j
Dim i
index=Hour(Now)
index=CInt(index)
reportfile=CStr(Date)
reporttime=Hour(Now)
reporttime=CStr(reporttime)
reportfile=reportfile
reportfile1=reportfile
reportfile="D:\report\" & reportfile & ".xls"
Dim TEMP_1
Set TEMP_1 = HMIRuntime.Tags("NewTag")
Dim TEMP_2
Set TEMP_2 = HMIRuntime.Tags("FIT2")
Dim TEMP_3
Set TEMP_3 = HMIRuntime.Tags("FIT1_add")
Dim TEMP_4
Set TEMP_4 = HMIRuntime.Tags("FIT2_add")
后面回答把程序补上，欢迎来电，来函讨论。谢谢！13918641075
最佳答案
数据清零的时间不对，应该在8点，文件另存之后再对所有数据清零。你现在的程序应该是在0点的时候把所有数据都清零了，所以你8点钟保存的时候是已经清零后的数据了。
提问者对于答案的评价：
应该是9点时候清零才对，非常感谢你的来电。
王
原创文章，作者：more0621，如若转载，请注明出处：https://www.zhaoplc.com/plc275528.html
微信扫一扫 
支付宝扫一扫 