更改消息框名称

您好目前我有一个消息框，这有助于我显示macrosbutton正在运行时项目的名称。 但是，有一个问题，因为我不知道如何更改消息框的标题，而不是“Microsoft Excel”标题。 下面是find“Microsoft Excel”标题的图像，我想对其进行更改：

这是我迄今为止产生这样的消息框的代码：

Private Sub Button() Msg = "Name Of Projects:" & vbCr & "1.Establishing Global Research Alliances Phase 2" & vbCr & "2.Strengthening the Coordination of the MSG Program " & vbCr & "3.Support for Post-Private Sector and Small and Medium-Sized Enterprises Development Program Partnership Framework " & vbCr & "4.Communications Sector Reform" & vbCr & "5.Social Fund for Development Project " & vbCr & "6.Regional: Trade Finance Capacity Development" & vbCr & "7.Innovative Financing for Agriculture and Food Value Chains" & vbCr & "8. Financial and Legal Sector Technical Assistance Project" MsgBox Prompt:=Msg End Sub 

有没有我需要添加的代码，以便“Microsoft Excel”的标题可以改变？ 任何帮助，将不胜感激。 谢谢。

Answer 1

有更多的参数MsgBox函数 。 你可以改变显示的button，改变图标; 甚至添加一个自定义标题。

 MsgBox Prompt:=Msg, title:="My Titled MsgBox" 

[可选]参数就是这样。 使用它们或不使用它们，但要意识到它们的存在。

Answer 2

你可以这样编码。

 Sub Msg_exe() MsgBox "This is a message!", , "This is the Title" End Sub 

查看链接以了解更多关于excel中消息框的信息。 问候。