基于WordVBA新闻稿快速生成与排版系统的研究
2020-12-28吴智
摘要:对于高职院校而言,在展示学院形象,提升学院教育品牌等方面,新闻宣传起重要作用。新闻稿快速生成与排版系统界面美观简洁,操作简单,生成的新闻稿结构完整、格式规范,大大提高新闻写作速度,具有很好的实用价值,值得推广应用。
关键词:新闻稿;WordVBA;快速生成;排版系统
中图分类号:TP311 文献标识码:A
文章编号:1009-3044(2020)33-0214-03
开放科学(资源服务)标识码(OSID):
对于高职院校而言,新闻宣传在展示学院形象,提升学院教育品牌等方面起重要作用。如何高效、准确的生成结构完整、格式规范、新闻要素齐备的新闻稿件,是高校宣传工作的重要课题。
1 当前新闻稿写作存在问题
1.1新闻要素不齐备
新闻基本要素指时间、地点、人物、事件的起因、经过、结果共六个要素,新闻要素不完整是指缺少其中某个要素,例如缺少地点,时间不详细等。
1.2 新闻结构不完整
新闻基本结构一般包括:标题、导语、主体、结语、来源五部分。结构不完整是指缺少某些部分,比如缺少导语、结语。
1.3新闻格式不规范
新闻稿件中新闻标题、正文的文本字体、大小,对齐方式、行间距,图片对齐方式、大小不规范等现象十分常见。
1.4手动输入效率慢
当前新闻写作,主要利用文字编辑软件,比如word来编辑新闻文稿,其写作效率低。
2 软件主要功能
2.1快速生成结构完整、要素齐备的新闻
通过简单设置,能快速生成新闻标题、导语、主体、结语以及稿件来源等信息,结构完整、要素齐备。
2.2 新闻稿自动排版
按规定格式实现自动排版。
2.3 新闻修改智能提醒
通过在稿件中添加批注,实现智能提醒,快速高效地修改新闻稿件。
3 軟件的选取
WordVBA是基于VB(Visual Basic)发展而来的,是微软专门针对MS Office设计的开发语言,主要用于拓展MS Office的功能[2],通过访问WordVBA的属性或调用方法即可实现对各个对象(段落、图片、表格等)的操作。
4 软件开发
软件主要包括三大功能:新闻设置、生成新闻、新闻检测,打开软件后,打开右键菜单可看到功能设置选项。
4.1 新闻设置
新闻设置主要设置作者姓名、工作(负责摄影或写稿)及所在的部门,界面如图1所示,将数据写入数据库,方便主程序调用,只需设置一次。
4.2 生成新闻
生成新闻是软件的主要功能,根据新闻结构和写作顺序,采用五个选项卡,依次设置标题、导语、主体、结语、来源。
4.2.1 生成标题
新闻标题,特别是简讯类标题,一般包括新闻单位、类型、名称,通过选择单位、类型,输入相关信息(如新闻名称),快速生成新闻标题,如图2所示。
以讲座类新闻标题为例,选择单位:部门(若在新闻设置中设置了单位,则不需选择部门),然后选择新闻主类型:讲座论坛,再选择子类型:讲座,接着设置新闻的相关信息:讲座名称、主讲人及职称,新闻标题自动生成,如图3(a)所示。
新闻子类型由主类型确定。新闻子类型一旦选定,系统自动生成相应新闻模板,该软件可生成五十多个模板,以满足日常新闻写作的需要。
4.2.2 新闻导语
导语由两部分组成:新闻导语和新闻要素。新闻导语为可选项,主要表达新闻举办的目的,其内容由新闻子类型确定。例如新闻子类型为讲座,只需要勾选导语复选框,即可得到讲座的导语:“为进一步XXX,提高XXX,”可根据实际情况进行修改;新闻要素为必选项,包括时间、地点、参加人员、主持人等,要素的个数由新闻类型确定。选择不同新闻要素时,导语预览及时更新,方便查看。如图3(b)所示。
4.2.3 新闻主体
新闻主体包括两部分:新闻图片和主体内容两部分。新闻图片为可选项,当不设置时,新闻为纯文字新闻,设置新闻图片时,单击插入图片按钮,系统自动判断图片的类型及大小,目前支持最多插入3张图片;图片标题和新闻主体内容由系统自动设置,可根据需要进行修改,图4为新闻主体设置界面。
4.2.4 新闻结语、来源
新闻结语主要介绍新闻举办的意义,新闻来源主要介绍作者信息及所在部门,二者的内容由系统自动设置,可根据需要进行修改,如图5所示。
4.2.5 生成新闻模板
按上述顺序设置后,单击【生成新闻】按钮,自动生成新闻稿。程序主要功能如图6所示。
下面重点介绍文档排版。文档排版,指按新闻稿格式要求,对文档排版,如图7所示,以正文排版为例,设置正文文本的字体、大小、对齐方式、首行缩进、行间距、段前段后的距离等。
程序如下:[1][3][4】
'正文样式
For i=2 To ActiveDocument.Paragraphs.Count
If InStr(1, ActiveDocument. Paragraphs(i). Range. Text,”信息来源”)Then
m=i
Exit For
Else
m= ActiveDocument.Paragraphs.Count
Exit For
End If
Nexti
Fori=2 Tom -1
With ActiveDocument.Styles(wdStyleNormaI).Font
'设置字体、大小
.Name=”宋体”
.Size= 12
End With
With ActiveDocument. Styles(wdStyleNormal). Paragraph-Format
对齐方式,左对齐
.Alignment= wdAlignParagraphLeft
'首行缩进
.CharacterUnitFirstLinelndent=2
'行间距,2倍行距
.LineSpacingRule= wdLineSpaceDouble
'设置段前段后的距离
.SpaceBefore=0
.SpaceAfter=0
End With
ActiveDocument.Paragraphs(i).Style= wdStvleNormal
Nexti
文档排版后加批注,主要利用正则表达式查找文档中的“XXX”内容(即修改的内容),若查到,则在文档相应位置加上批注,实现智能提醒。如图8所示。
5 软件的应用
启动软件后单击右键,首先点击【新闻设置】项(首次使用时设置),然后在右键菜单中点击【生成新闻】项,通过设置各选项卡,生成新闻稿,并编辑,最后在右键菜单中点击【新闻内容检测】,借助批注修改新闻稿。
该软件界面美观简洁,操作简单,方便实用,通过在学院推广使用,受到师生一致好评。目前该软件是学院版,各功能还需要继续完善,其数据扩展性还需要进一步提高。
6 结束语
軟件根据新闻的写作顺序,符合人们写作习惯,其界面美观简洁,操作简单,生成新闻稿件,结构完整、格式规范,大大提高新闻写作的速度,具有较高的实用价值,在高职院校新闻写作中值得大力推广。
参考文献:
[1]邵小兵,廖慧芬.利用VBA实现Word自动排版[J].中国教育技术装备,2005(10):45-46
[2]吴智.基于WordVBA毕业设计论文格式自动检测研究[J].电脑知识与技术,2019,15(15):105-107.
[3]宋作臣.基于Word VBA自动排版系统的设计与开发[D].济南:齐鲁工业大学,2016.
[4]张亮.基于ExcelVBA的文书快速生成工具[J].电脑知识与技术(学术交流),2016(112):264-265.
【通联编辑:谢媛媛】
作者简介:吴智(1978-),男,四川广元人,高级工程师,学士,主要研究方向为机电一体技术与办公自动化。