Excel精英培训网

 找回密码
 注册
数据透视表40+个常用小技巧,让你一次学会!
查看: 3682|回复: 14

[已解决]VBA求助:判断高级筛选结果是否正确

[复制链接]
发表于 2015-9-25 19:01 | 显示全部楼层 |阅读模式
我是一个老师,想编写一个提交代码来判断学生做出的高级筛选的结果是否正确,哪位大神能够帮忙?万分感谢!只需要判断结果是否正确就行,不用判断过程。
最佳答案
2015-10-10 19:24
为适合不同的题目,我将判断工具也修改了一下,使用方法不变。

(, 下载次数: 1)

求解.rar

16.22 KB, 下载次数: 8

发表于 2015-9-25 19:23 | 显示全部楼层
本帖最后由 zjdh 于 2015-9-25 19:25 编辑

这还不简单,你先自己做一个,然后算出左眼视力列之、及右眼视力之和及行数。
看学生的答案是否相符即可。
你这题目
正确答案数:               
            左眼视力        右眼视力
行数        列和        列和
31           35.4        33.9
回复

使用道具 举报

发表于 2015-9-25 20:06 | 显示全部楼层
给你一个小工具,运行后右键命令菜单中多一个“判断答案”命令,打开被判断文件,执行此命令就获得结论啦。

判断答案.rar (12.23 KB, 下载次数: 13)
回复

使用道具 举报

发表于 2015-9-25 20:17 | 显示全部楼层
dh.gif
回复

使用道具 举报

 楼主| 发表于 2015-9-26 23:11 | 显示全部楼层
zjdh 发表于 2015-9-25 19:23
这还不简单,你先自己做一个,然后算出左眼视力列之、及右眼视力之和及行数。
看学生的答案是否相符即可。 ...

谢谢你的答案,可是如果我按了重做按钮,数据是变化的啊,这个能解决吗?
回复

使用道具 举报

 楼主| 发表于 2015-9-26 23:12 | 显示全部楼层
zjdh 发表于 2015-9-25 20:17

我这试过了,怎么不行呢,不知道是不是操作的不对。看了代码也没明白道理是什么。总之还是谢谢了。
回复

使用道具 举报

发表于 2015-9-28 10:58 | 显示全部楼层
有高手能解决吗,顶一个!
回复

使用道具 举报

发表于 2015-10-5 15:37 | 显示全部楼层
那来的“重做”按钮??
回复

使用道具 举报

 楼主| 发表于 2015-10-10 17:37 | 显示全部楼层
zjdh 发表于 2015-10-5 15:37
那来的“重做”按钮??

我上传的文件里有个重做,也有个提交啊
回复

使用道具 举报

发表于 2015-10-10 17:55 | 显示全部楼层
噢,只要把红色语句删掉即可!
Sub redo()
    Application.Calculation = xlManual
    Application.ScreenUpdating = False
    Range("l4:t60").Clear
    Range("m6:r7").Style = "条件区域"
    Range("m13").Style = "答题区域"
    Calculate
End Sub
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则

小黑屋|手机版|Archiver|Excel精英培训 ( 豫ICP备11015029号 )

GMT+8, 2024-3-29 14:16 , Processed in 0.871420 second(s), 13 queries , Gzip On, Yac On.

Powered by Discuz! X3.4

Copyright © 2001-2020, Tencent Cloud.

快速回复 返回顶部 返回列表