ExcelTip.Net留存知识帖 ---【注:附件之前被网盘供应商清空后,现已修复-现已修复-现已修复为本地下载!】
现在位置:首页 > E文精选 > Word > 没有excel,Word也可以(二)添加成绩等级评定

没有excel,Word也可以(二)添加成绩等级评定

作者:绿色风 分类: 时间:2022-08-17 浏览:157
楼主
い卋玑┾宝珼
引用作品链接见作品信息

是小月在09年出的一道题目,闲来无事,就思考一下,如果仅用Word能否实现这一点。当然,仅用Word会很麻烦,这并不是最优解,但是,可以很好在认识到Word的强大,开拓思路。
要求:不用vba,仅仅使用word基础操作,批量在数学成绩分数后面插入学习等级,根据数学成绩来判断,<60为不及格,>=60同时<80为良好,>=80为优秀。
我把用Excel这件事情去掉了
源文章格式:

 
目录是希望是所有的00分之后,加个成绩等级评定,我们来操作一下。
第一步,将回车换成文章中没有出现的格式,以便还原格式,不勾选通配符匹配,将“^p”替换为“$”

 
第二步,整理成可以调整为表格的格式,勾选通配符匹配,将“([0-9]{1,})分”替换为“^t\1^t^p”
这样,可以让转化成的表格,是一列,然后后面有一列空的。

 
第三步,文本转表格

 
第四步,在第三列输入公式,判断等级
{ if { =sum(left) } = 0 "" { if { =sum(left) } < 60 "分,学习等级不及格" { if { = sum(left) } < 80 "分,学习等级良好" "分,学习等级优秀" } } }
所有的括号都是ctrl+F9输入的。
如果第二列为空,则什么也不显示,如果不为空,则判断分数,显示相应的成绩等级。

 
注意点:所有域括号的两侧,都注意加半角空格。
第五步,选中输入的域代码,复制到整个第三列,并全选文本,按F9刷新,如果显示的还是域代码,证明当时正处于显示全部域代码的状态,按alt+F9切换即可。
第六步,全选,按ctrl+shift+f9,将域代码转化为静态文本。
第七步,将表格转化为文本。

 
第八步,不勾选使用通配符,将“^p”替换为空
第九步,不勾选使用通配符,将“$”替换为“^p”,还原段落标记
第十步,设置标题行居中,正文首行缩进,效果图如下(标红仅为强调加的内容)
 

文档附件:

实例二.rar


此系列为三帖,为进阶型:
Word表格转置

仅用word的功能,实现表格的转置
批量添加等级

仅用Word的功能,实现分数等级评定的批量添加
批量替换日期

仅用word的功能,将文章中的日期实现批量的替换
2楼
不懂有仨
又是域,太强大了,学习了,谢谢西西老师!
3楼
以以
谢谢
4楼
白米饭
西西威武

免责声明

有感于原ExcelTip.Net留存知识的价值及部分知识具有的时间限定性因素, 经与ExcelTip.Net站长Apolloh商议并征得其同意, 现将原属ExcelTip.Net的知识帖采集资料于本站点进行展示, 供有需要的人士查询使用,也慰缅曾经的论坛时代。 所示各个帖子的原作者如对版权有异议, 可与本人沟通提出,或于本站点留言,我们会尽快处理。 在此,感谢ExcelTip.Net站长Apolloh的支持,感谢本站点所有人**绿色风(QQ:79664738)**的支持与奉献,特此鸣谢!
------本人网名**KevinChengCW(QQ:1210618015)**原ExcelTip.Net总版主之一

评论列表
sitemap