DNME知识产权管理档案

大连新明华电子科技有限公司(DNME)，在年轻有为、开拓进取的新任总经理带领下，高度重视技术进步、新产品研发试制，积极打造数字化智能制造企业新态势，推动创新、创业高质量发展，从2017年6月16日开始，迈入拥有自主知识产权的新阶段，公司也在当年通过了高新技术企业的资格评审。

提升知识产权管理水平，引导企业员工在新产品研发、新技术应用、新制造升级过程中，激发全体员工积极参与“双创”的主动热情，贯彻落实《企业知识产权管理规范》国家标准，规范企业知识产权管理的基础条件，成为公司领导高度重视的新课题！

图1 专利展示墙

首先，企业在生产经营活动中涉及的有关知识产权的各类活动，应当有相应的记录并形成档案，为此，我们利用EXCEL建立了具有特色的“DNME知识产权管理档案”，对于掌握企业知识产权构成状况、管理企业知识产权实施奖励、维护企业知识产权缴费进度，发挥了积极的推动作用，尤其是对于各种企业报表数据的提取，具有准确、方便、及时的有益效果。

实现方式如下：

1、字段定义

根据数据统计分析的基础条件要求，初始可以选择以下字段：序号、被受理标题、类型、国别、申请号、区分、申请日期、授权日期、发明人、服务机构等。

图2 DNME 知识产权管理档案

2、公式定义

进一步地，区分字段取值为：技术交底书、初稿、受理、实审、授权，这样的顺序也是一项知识产权内容从构思、设计、验证到撰写、申请直至授权的流程体现。该数据项的取值采用下拉列表选择，通过数据完整性的公式定义实现。

图3 公式定义

3、下拉列表数据有效性

在第一标签页，也就是受理专利信息页內，选择区分字段的数据项，选择菜单项：数据，再选择数据有效性下拉菜单工具栏，选择数据有效性，弹出数据有效性设置对话框。有效性条件设置为允许：序列，来源：为前述公式定义。

图4 数据有效性设置

4、区分数据项数据值选择

这样，在区分数据项内就可以选择、且仅可以选择前面所述的数据值。

图5 下拉列表数据值

5、自动计算

特别是，当区分字段取值不同时，VB script自动运行程序，将数据行的单元格背景设置为规定的颜色，便于直观区分各项主题内容，同时计算出各项指标的统计结果，如已授权项数、办登项数、实质审查项数、已受理项数、初始稿件项数和技术交底书项数等等。

Private Sub Worksheet_Change(ByVal Target As Range)

r = Target.Row '取行号

Select Case Target.Text

Case "办登"