inputbox 对话框 点击“确定” “取消”，vba怎么写

Question

如题所述

Answer 1

dim ans As Variant
ans = MsgBox(输入你要显示的内容, vbOKCancel + vbDefaultButton2)
If ans = vbOK Then
....... 点确认执行的代码
Else
....... 点取消执行的代码
End If

如果是inputbox的话本身就自带确定和取消的，例如：
dim aaa as string
aaa=inputbox(输入你要显示的语句）
这样就可以了