模块2代码.docVIP

模块2代码 “类1”代码 Public WithEvents appWord As Word.Application Private Sub appWord_WindowSelectionChange ByVal Sel As Selection 文档选择对象改变时发生此事件 Call 统计信息提取 End Sub “模块2”代码 ************************************************************************** ** 类别：word vba 用于：生物题库的word文档 .docx ** 制作人：张晋升 版本：V1.0 创建日期：2011-12-18 ** 内容： ** 一、全局变量声明 ** 二、选项卡回调 ** ** 三、自定义过程 ** 1、题目入库 2、选择题入库 3、填空题入库 ** 4、选择题目 5、全部清除选题 6、全部选择题目 ** 7、找重题 8、继续找重题 9、填空题答案 ** 10、选择题答案 11、打开统计.xlsx 12、打开合成试卷.xlsm ** ** 四、自定义函数 ** ** 13、DeleteSplace 去掉字符串中所有的空格 ** 14、OpenExcel 打开指定的excel *******************************************