有没有更好的方法为用户提供字符串选择?

时间:2015-10-30 16:01:40

标签: string excel vba

我正在使用VBA来处理大量数据。由于数据不干净,有时我需要让用户手动选择哪个是正确的。如果可以的话,我更喜欢避免使用用户表格。 (虽然如果这是最好的方法就会这样做)。 以下是我到目前为止的情况:

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  

我怎样才能最好地抓住几个字符串并要求用户选择一个字符串?

1 个答案:

答案 0 :(得分:1)

更好的方式是一个透视问题。 如果更好意味着减少编程工作量"然后保持这种方式。 如果更好意味着更加用户友好",那么我会努力并使用单选ListBox构建用户表单。这甚至比ComboBox更好,因为用户可以看到所有选项,只需单击正确的选项即可。