Intouch报表EXCEL报表制作

1、用EXCEL打印报表1.原理首先根据报表要求，用INTOUCH的附件HISTDATA软件形成一个有规定数据的.CSV文件（逗号分隔文件，可用 EXCEL打开）。这个.CSV文件是英文的，不符 合一般报表的要求，只能提供数据。所以需要另设计一个空的 EXCEL报表模版，再 将.CSV文件的数据复制到报表中，形成完整的报表。通过INTOUCH可以自动产生.CSV,再通过EXCEL的宏程序打印报表，可以完 成招呼打印和定时自动打印。如果有多个报表，需要形成多个.CSV文件和设计多个EXCEL报表。 大致步骤如下：设计报表，确定一个报表的开始时间、时间总长 .nTOUC幅电间魏据霰饰踊，搠嬲禄所趣矗用

2、 在InTouch脚木中的粕HDWWRITEFILE =1形成 用EXCEL设计报表的模版。在 EXCEL中，用记 在塞成稹SV潮械的ToCSV财神坳树朝artApp 函数，启EXCECSV屋件Stepl:自动生成需要的标记名精心整理在INTOUCH开发环境中，将向导库中 趋势 历史趋势向导（HistData）放入窗口。这将自动形成若干标记名（Tag）。有关标记名以HDW开头加上它们的DDE的ITEM向导选择wi接报窗灯并框面摘数文仪游运钮警关架板值本表标行示示显显含指示器和刻度的缩放/平移趋势面极 历史趋势HistD ata历史数据向导埴势笔图例向导描建 含左/右指示器显示时间j和EU刻度的

3、历史趋势确定I取消I添加到工具栏命名。-这些标记名说明如下：二二二二HDWDATADIR消息型历史数据文件的目录的路径名，可用函数赋值例如 HDWDataDir=HTGetLogDirectory（）;HDWDBDIR消息型InTouch标记名字典的目录的路径名，可用函数赋值例如 HDWDBDir=InfoInTouchAppDir（）;HDWSTARTDATE消息型与$DateString相同格式的数据采样开始日期HDWSTARTTIME 消息型使用24小时时钟的HH:MM:SS格式的数据采样开始时间HDWDURATION消息型数据时间长度（报表时间总长度）可以用星期，天时，分，秒，等来表示

4、下面是有效的字符：w星期，d天，h小时，m分，s秒允许使用小数值例如扩.5速示500毫秒若只需一个样本请将DURATION设为。零HDWINTERVAL消息型采样间隔的时间长度可以用星期日小时分和秒来表示例如1W表示一星期允许使用小数值例如用.25d来表示6小时有效字符与HDDURATION相同注意DURATION和INTERVAL允许的最大时间长度均为6周这适用于所有请求类型日秒等 例如如果使用日则最大值为42, 7天x6周=42HDWTAGS消息型历史数据的标记名列表（报表中需要的标记名）以TagA,TagB,TagZ格式输入，此外采样日期和或时间可 以通过使用内部系统标记名$Date和$

5、Time来请求例如$Date,TagA,TagB或$Time,TagA,TagB”或 $Date,$Time,TagA,TagB”HDWTAGS1,TAGS2,.消息型HDWTAGS字符串在 WindowViewer中的长度可以为131个字符在Excel中的长度可以为255个字符 字符串，可以通过迭加标记名项目Tags1Tags2 等来延长以适应更长字符串的要求，如果标记 名需附加额外的标记名文本请在字符串末输 入一个加号（+）例如，TAGS=$Date,ProdLevel,ProdTemp,+TAGS1=ReactLevel,Temp,GasLevel,+TAGS2=MotorStatus”

6、注意不允许使用重复标记名，每个标记字符串的最大长度为512字节HDWFILENAME消息型规定生成的.CSVC件的路径和名称例如，C:INTOUCHHDFILE.CSVHDWWRITEFILE 整型当设置为1时HistData会将请求数据写入由FILENAME项目名指定的文件，当文件更新完成后WRITEFILE 会自动重置为0零STATUS离散型显示最后一次操作的状态1表示成功，0零表示出错ERROR消息型包含上次错误说明的字符串，如 STATUS为1则显示无，如STATUS为0零则显示错误消息字符串前9个TAG规定数据的内容，HDWWRITEFILE=1 是写.CSV文件的命令，最后两 个用

7、于检查状态和错误。写脚本时应注意：HDWDBDir、HDWDataDir这两个标记名是规定路径的，可以用函数赋值。可 以写在应用程序脚本内。HDWFilename这个标记名是规定.CSV文件的路径和文件名。如果只打一种报表，也可以写在应用程序脚本内，否则应在形成.CSV文件前指定。HDWTags和后续的HDWTags1、HDWTags2这些标记名是规定.CSV文件的包 含的标记名。如果只打一种报表，也可以写在应用程序脚本内，否则应在形 成.CSV文件前指定。HDWStartDate、HDWStartTime这两标记名是规定.CSV文件数据的起始日期和 起始时间的。如果是招呼打印报表，人工输入时

8、格式一定要正确。如果是自 动打印报表可以计算得到，一般可以在条件脚本内规定。精心整理精心整理HDWInterval、HDWDuratione这两标记名是规定.CSV文件的数据时间间隔和数据时间的总长度，如日报表分别为：1H (小时)和1D (1天)。HDWWRITEFILE=1为生成.CSV文件，只有上述标记名义赋值后，才执行他。ERROR这个标记名可以显示生成.CSV文件时是否有错误，调试时非常重要。例如：下面脚本生成一个日期由 StartDatel定，包括两个标记名PI-101,TI-101, 日报表。可以复制在你的脚本中，修改一下就可以形成所需的.CSV文件。HDWStartDate=S

9、tartDate1;HDWStartTime= 00:00:00” ；HDWDBDir=InfoInTouchAppDir();HDWDataDir=HTGetLogDirectory();HDWFilename=C:REPORT.csv;HDWTags=$Date,$Time,PI-101,TI-101”;HDWInterval=1H;HDWDuration=1D;HDWWRITEFILE=1 ;HDWDataDir=HTGetLogDirectory();HDWDBDir=InfoInTouchAppDir();HDWStartDate=#DTPicker1.Value;时间控件名称HDW

10、StartTime=00:00:00;开始时间HDWFilename=C:REPORT.csv;HDWTags=$Date,$Time,zj_AO1,zj_AO2;HDWInterval=1H;HDWDuration=1D;精心整理精心整理HDWWRITEFILE=1;Step2招呼打印报表的情况如果是招呼打印（不定期打印，人工输入打印日期和时间的报表打印），则可以 在 INTOUCH 中开一个窗 口输入 HDWStartDatel, HDWStartTime, HDWInterval , HDWDuration的参数。并做一个按钮，在动作脚本中给固定的参数赋值和最后令 HDWWRITEFIL

11、E=1 ;脚本的例子形成的.CSV文件的例子Step3定时自动打印的情况如果是定时自动打印，需要在条件脚本（或数据改变脚本）中写代码完成。这里需要特别注意起始日期和时间。如：日报表示在0点以后打印的，所以需要通过计算得到前一天的日期，可以用下面语句HDWStartDate=StringFromTime（$Date-1）*86400,1）。举例：Step4运彳f INTOUCH ,检查生成的.CSV文件。.建立EXCEL报表Stepl设计一个报表格式。例如：先画出报头在EXCEL导入相应.CSV文件。找到相应.CSV文件，一步步导入选逗号分割，指定导入区域起点单元，精心整理精心整理为了更直观，可

12、以用EXCEL的功能加一个趋势图。Step2做一个宏选菜单工具宏录制新宏，起一个宏名（如 mr1）,确认。由于EXCEL不允许在有数据的区域导入数据，所以先删除前面导入的数据。选择数据区，按Del键在EXCEL重新导入相应.CSV文件。重复刚才的步骤打印和保存（报表需要打印时）或另存（报表不需要打印时）。停止记录宏写VBA脚本，让宏自动执行菜单工具宏VB编辑器双击 ThisWorkBook在代码区选WorkBook在PrivateSub_Open（两数中，加入Run（宏名”）Application.Quit关闭VB编辑器，返回Workbook,确定报表的路径和文件名（如c:report1.xl

13、s）, 保存报表。这样，我们的报表就完成了。一打开这个报表，就会执行宏，然后退出。在调试时，可以迅速按Atrl+Break键停止宏执行。注：在另存的情况下，在宏中找到另存的路径和文件名，用date,tim等变量加到文件名中。Step3:用INTOUCH打开报表在INTOUCH的相应脚本中加一条语句，启动 EXCEL:精心整理StartAppC:ProgramFilesMicrosoftOfficeOfficeexcel.exec:report1.xls;这里，C:ProgramFilesMicrosoftOfficeOfficeexcel.exe 是 EXCEL 的路径和文件名，注意EXCEL的版本不同路径不一样。c:report1.xls是报表的路径和文件名，之间有 一个空格。一个日报表的例子。语句说明：1）规定报表起始日期，2）规定报表起始时间，3） InTouch的路径，4