excel - MsgBox vbOKCancel 在单元格中留下 1 或 2

Question

我正在使用类型为 8(单元格引用/范围)的输入框。所选范围的部分验证是使用下面的 MsgBox。

问题是当你选择了错误的范围并且MsgBox提示你时，如果你点击Ok它会在单元格中留下数字 2，如果单击 Cancel它在单元格中留下数字 1。

ElseIf myRange.Value = "" Or myRange.Value = 0 Then   

  '... 

   myRange = MsgBox("Please Select a Valid Code. Try again?", vbOKCancel + vbQuestion)
   If myRange = vbCancel Then 'No retry
       Exit Sub
   Else 'retry
       Run "MyCellToCorrect"
   End If

Else

Answer 1

您正在分配 MsgBox 的返回值, 这将是 vbOK (1) 或 vbCancel (2)、范围。您应该将其分配给数字变量，然后测试该变量:

Dim Res As Integer
....

Res = MsgBox("Please Select a Valid Code. Try again?", vbOKCancel + vbQuestion)
If Res = vbCancel Then 'No retry
    Exit Sub
Else 'retry
    Run "MyCellToCorrect"
End If