Change Message Box heading

[Guest]

Good morning!

Ive inserted a few macros to create message boxs in my ppt. When I run the
macros, there is a heading that says "Microsoft PowerPoint" in each one.

How do I change the heading that appears from "Microsoft PowerPoint" to
something else such as "Summary Report" and "Genration Report"?

Please see the following:

Sub SumRprt()
MsgBox ("Provides a summary list reports based on their occurrence date
and any other specified criteria.")
End Sub

Sub GenRprt()
MsgBox ("Provides a summary list of generated reports based on the
occurrence date and any other specified criteria.")
End Sub

Thanks in advance!

 

[Steve Rindsberg]

Good morning!

Ive inserted a few macros to create message boxs in my ppt. When I run the
macros, there is a heading that says "Microsoft PowerPoint" in each one.

How do I change the heading that appears from "Microsoft PowerPoint" to
something else such as "Summary Report" and "Genration Report"?

Call MsgBox("Test", , "Your Message Here")

So:

Call MsgBox ("Provides a summary list of generated reports based on the
occurrence date and any other specified criteria.",,"General Report")

MsgBox is actually a function that can return a value (the user's choice in
this case) so you can also:

Dim lResponse as Long
' this should be all on one line
lResponse = MsgBox("Provides a summary ..... Click Yes to continue, No to
cancel.",vbYesNo,"A more useful messagebox")
' now do something with the result:
if lResponse = vbNo Then
' cancel the subroutine
Exit Sub
End if

 

[Guest]

Thank you for all your help....it works great!



"> Call MsgBox("Test", , "Your Message Here")