权限被拒绝:' Msgbox'

时间:2016-01-08 05:20:46

标签: vba

我正在使用VBA创建带有是/否响应的消息框。特别是对于一个消息框,消息框工作正常,但我在此之后放置的任何消息框都会导致权限被拒绝:' Msgbox"错误。我的代码看起来像这样:

if msgbox ("Release this Assessment to the Team Leader?", vbyesno) = vbyes then
   msgbox "Released"
   else
   msgbox "Not released"
end if

所以我得到第一个消息框但是对于任一选择(是或否)我收到错误消息。知道可能导致这种情况的原因吗?

1 个答案:

答案 0 :(得分:-1)

请改为尝试:

msgBox ("Release this Assessment to the Team Leader?", vbyesno)
select Case msgBox
    Case "Yes":
        msgBox "Released", vbokonly
    Case "No":
        msgBox "Not released, vbokonly
End Select