excel - 非常绿色的 VBA 用户,第 2 行以下的所有内容都可以正常工作,但我如何使它上面的工作正常?
问题描述
我在 Excel 中为我的表弟做了一个测试;现在,如果你得到正确的答案,那么你必须按下一个按钮来回答下一个问题,但我希望宏显示“正确”2 秒钟,然后继续下一个问题,而无需按下按钮。请帮忙
我在下面尝试过,它曾经是常规按钮单击宏,但我尝试更改它并且它不会运行
Sub answer_correct()
If K11.Value == "Correct!" Then
Range("A1") = WorksheetFunction.RandBetween(1, 65)
Range("I11").Cells.ClearContents
ActiveSheet.Range("I11").Select
Range("F18").Value = Range("F18").Value + 1
End If
End Sub
我收到语法错误,我希望计数器增加 1 并且问题要重置
解决方案
VBA 从不==
用于比较运算符。改为使用=
。另外,我假设您想引用范围 K11
而不是一些未指定的变量。因此,更换
If K11.Value == "Correct!" Then
经过
If Range("K11").Value = "Correct!" Then
推荐阅读
- python - 如何在 python 3.7 中使用 eval() 和 compile()?
- reactjs - 如何在 React 中的表单提交上重定向和传递数据作为道具?
- spring - 为什么我们使用@Autowire
- java - Libgdx - Tiledmap 渲染的瓷砖从屏幕上消失
- django - 无法在 Django 中将静态文件加载到我的 Index.html 中
- smartcard - EMV 选择应用程序返回“不支持的功能”
- javascript - 访问嵌套状态
- r - 按行而不是列进行数组/矩阵比较
- java - 非常大数的幂函数
- reactjs - 如何在 React 打字稿中读取 xml 文件(toolsbox.xml)