包含excelvbamsgbox的词条

本文目录一览：

• 1、EXCEL VBA msgbox问题
• 2、求助如何使用Excel VBA中的对话框MsgBox()!
• 3、EXCEL VBA 函数Msgbox应用

EXCEL VBA msgbox问题

变成漏斗形状表示你的对话过程没有完成，在等待中。。。，必须完成才能做后续动作

求助如何使用Excel VBA中的对话框MsgBox()!

如果一定要用msgbox的话，就用yes

和

no按钮来分别表示对应编号的两个驾驶员的姓名。

写一下大概的程序

.....................'根据编号确定姓名NameYes

和NameNo的程序

public

sub

Mymsg

(byval

NameYes

as

string,byval

NameNo

as

String)

dim

Respons

Respons

=msgbox(‘按钮Yes选择“

NameYes

"

按钮No选择

"

NameNo,VbYseNo

)

if

Respons=Vbyes

then

range("B1").value=NameYes

else

range("B1").value=NameNo

end

if

end

function

EXCEL VBA 函数Msgbox应用

if

msgbox("内容",vbyesno,"选择")=vbyes

then

也可以直接将msgbox("内容",vbyesno,"选择")的值赋给一个变量