弹出对话框的vba怎么写

发布网友 发布时间:2022-04-23 21:47

我来回答

2个回答

热心网友 时间:2023-09-06 04:12

Sub 重复确认()
    If MsgBox("你已启动成本核算模块,将清除你excel内所有内容,并新建核算框架", vbOKCancel) = vbOK Then
【……需要执行的功能代码】
    End If
End Sub

热心网友 时间:2023-09-06 04:13

if msgbox("提示",vbyesno)=vbyes then

'执行

else
'退出

end if追问如何将 yes no 改成中文的 是或否

追答

运行后 就是中文的 除非你系统是英文系统

声明声明:本网页内容为用户发布,旨在传播知识,不代表本网认同其观点,若有侵权等问题请及时与本网联系,我们将在第一时间删除处理。E-MAIL:11247931@qq.com