VBA编程中MsgBox函数怎么用

Posted 2023-04-05

MsgBox函数一般有两种用法：
1、纯粹作消息框使用，比如显示消息“运行结束！”，代码：
msgbox "运行结束！"
2、在对话框中显示消息，等待用户单击按钮，并返回一个 Integer 告诉用户单击了哪一个按钮。比如：
If MsgBox("单击“是”则删除该文件，“否”放弃", vbYesNo) = vbYes Then
'删除文件的代码
End If
执行这个msgbox函数将在对话框中出现“是”“否”两个按钮，让用户选择下一步要进行的操作 参考技术A 显示后面的内容，例如：
MsgBox "Hello, World"

EXCEL VBA 函数Msgbox应用

EXCEL VBA 函数Msgbox应用
我想做个按钮名字假如叫计算，我点击计算按钮，就执行计算公式。代码怎么写

按钮执行效果相当于F9吧（计算所有工作表），那么下面的一个语句即可：
Calculate 参考技术A if msgbox("内容",vbyesno,"选择")=vbyes then 也可以直接将msgbox("内容",vbyesno,"选择")的值赋给一个变量追问

点击确定直接按公式计算

怎么写

参考技术B sub 计算()
dim x as string
x = worksheetfunction.sum(2,3)
msgbox "计算结果为：" & x
end sub追问

点击确定按钮直接计算出结果怎么弄

追答

sub 计算()
dim x as string
x = me.textbox1.value
msgbox "计算结果为：" & x
end sub

本回答被提问者和网友采纳