有没有更好的方法给用户一个string的select？

我正在使用VBA处理一堆数据。 由于数据不干净，偶尔我需要让用户手动select哪个是正确的。 如果可以，请尽量避免使用用户表单。 （尽pipe如果这是最好的方式将做到这一点）。 这是我到目前为止：

Sub string_choice() Dim msgValue msgValue = MsgBox("Hello, which is correct? Choose:" _ & vbCr & "Yes: if you want option A" _ & vbCr & "No: if you want option B" _ , vbYesNoCancel + vbQuestion) If msgValue = vbYes Then MsgBox "You chose option A" ElseIf msgValue = vbNo Then MsgBox "You chose option B" ElseIf msgValue = vbCancel Then MsgBox "script closing, no choice made." End If End Sub 

我怎样才能最好地抓住几串，并要求用户select一个？

Answer 1

更好的方式是一个angular度的问题。 如果更好意味着“less编程的努力”，那么保持这种方式。 如果更好的意思是“更加用户友好”，那么我会努力，并build立一个单选ListBox的用户表单。 这比ComboBox更好，因为用户可以看到所有的select，只需点击正确的选项即可。