在Excel中使用VBA计算某些单元格的数量
[英]calculate count of certain cells using vba in excel
问题描述
我已经建立了一个测验，并使用一些检查来显示分数，如果正确，则输出单元格为“ 1”，如果错误则为“ 0”。
计算分数我用的功能
=COUNTIF(S7:S158,1)
问题是，分数会随着用户开始写ans而更新。
我想要一个宏SUBMIT（使用表单控件），单击该宏即可获得分数。
我应该在Sub SUBMIT（）中编写什么以执行上述功能
3 个解决方案
解决方案1
1 已采纳 2013-12-28 22:08:16
您可以编写公式：
=IF(COUNTA(S7:S158)=x;COUNTIF(S7:S158,1);"")
其中x是许多问题（例如100）。 因此，函数COUNTA计算该范围内的非空单元格的数量，如果用户回答了所有问题，则条件COUNTA(S7:S158)=x成立，并计算COUNTIF(S7:S158,1) ，否则为空字符串被陈列
解决方案2
0 2013-12-28 20:35:32
您可以在Workbook_Open设置以下代码
Sheet1.EnableCalculation = False
在Sub Submit()
Sheet1.EnableCalculation = True
Sheet1.Calculate
如需更多信息，请参见本
解决方案3
0 2013-12-28 21:05:50
我是一名开发人员，只有在所有选项都用尽时才诉诸宏。 这主要是出于可能希望将其用于其他目的的人的利益。 但这只是我的偏爱。
您可以使用带有Show Score标签的单元格并接受Yes / No ，然后在=COUNTIF(S7:S158,1)周围放置一个IF 。
计算Excel行中的非空白单元格（不使用VBA）
声明:本站的技术帖子网页，遵循CC BY-SA 4.0协议，如果您需要转载，请注明本站网址或者原文地址。任何问题请咨询:yoyou2525@163.com.