首页 > 解决方案 > 非常绿色的 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 并且问题要重置

标签: excelvbatesting

解决方案


VBA 从不==用于比较运算符。改为使用=。另外,我假设您想引用范围 K11而不是一些未指定的变量。因此,更换

If K11.Value == "Correct!" Then

经过

If Range("K11").Value = "Correct!" Then

推荐阅读