[发明专利]一种基于VBA模块的突发公共卫生事件监测数据处理方法

权利要求书

1.一种基于VBA模块的突发公共卫生事件监测数据处理方法，其特征在于，步骤如下：

S1：建立VBA数据处理模块；

S2：新建EXCEL汇总文件，文件名设置成：突发公共卫生事件月分析+当月日期；

S3：调用突发公共卫生事件文件夹中的数据并整理成需要的格式；

S4：根据工作需要选取需要的数据；

S5：将提取的数据根据工作需要转化为文本输出

S6：将步骤S5中输出的每个文件夹的数据整理成需要的格式。

2.根据权利要求1所述的一种基于VBA模块的突发公共卫生事件监测数据处理方法，其特征在于，所述S1步骤中建立的VBA数据处理模块包括监测数据模块、数据整理模块和结果数据模块；

所述监测数据模块用于存储突发公共卫生事件发生的起数、突发公共卫生事件的发病数、死亡数以及发生类型；

所述数据整理模块用于提取辖区内突发公共卫生事件的发生分析提取需要的单元格数据；

所述结果数据模块用于输出分析者需要的信息由文本或图表的形式展示。

3.根据权利要求1所述的一种基于VBA模块的突发公共卫生事件监测数据处理方法，其特征在于，所述S2步骤中新建EXCEL汇总文件，还包括：

新建多个工作表，分别命名为突发公共卫生事件报告个案、同期对比数据、传染病突发公共卫生事件、地区分布、时间分布和学校突发公共卫生事件。

4.根据权利要求3所述的一种基于VBA模块的突发公共卫生事件监测数据处理方法，其特征在于，所述S3步骤中，列出监测数据清单，用Workbooks.Open指令打开文件夹中需要的工作表；应用UsedRange属性将监测数据工作表依此复制到新建的对应的EXCEL表中。

5.根据权利要求1所述的一种基于VBA模块的突发公共卫生事件监测数据处理方法，其特征在于，所述S4步骤中：

使用Columns属性，选择需要的类别，应用Trim函数删除前后空格；

使用Replace命令将表格中需要的命令替换为需要的事件名称；命名突发公共卫生事件分析的时间；

使用IF...EndIf属性与去年同期进行比较；

应用For....Next循环属性完成各类事件的发生起数、发病数和死亡数的提取，来完成学校突发公共卫生事件的分析。

6.根据权利要求1所述的一种基于VBA模块的突发公共卫生事件监测数据处理方法，其特征在于，所述S5步骤中，通过Workbooks.Open指令打开事件个案表，建立数据透视表，行区域为事件原因，事件级别，发生场所；列区域设置为数据，数据区域设置为发生起数、发病数、死亡数。

7.根据权利要求1所述的一种基于VBA模块的突发公共卫生事件监测数据处理方法，其特征在于，所述S6步骤中，每个文件夹的数据整理格式为：

将文件夹中附件的工作表底色设置为白色，标题栏设置为蓝色。