Suppress Startup Splash Screen?

S

Susan

I am starting Visio through VBA and haven't found a way
to suppress the startup splash screen. I've tried
setting Visible to false, but by the time the statement
is executed (right after the new application) the splash
screen has already been seen.

Any help would be greatly appreciated.
Susan
[email protected]
 
J

John Marshall, MVP

This is from the MSDN page
http://msdn.microsoft.com/library/default.asp?url=/library/en-us/devref/HTML
/DVS_27_Programming_Visio_with_Visual_Basic_897.asp

'If you click this button, a new (invisible) Visio instance
'is created and its process ID is reported. The instance is
'then made visible. You will receive a message that notifies
'you whether the CreateObject function successfully created a
'Visio instance. By creating an invisible Visio instance, the message
'box that contains the process ID remains visible until the user responds.
Private Sub Command2_Click()
On Error Resume Next
Dim appObj As Visio.Application
Set appObj = CreateObject("visio.InvisibleApp")
If appObj Is Nothing Then
MsgBox "Failed creating Visio instance."
Else
MsgBox "ProcessID: " & appObj.ProcessID
appObj.Visible = True
End If
End Sub

John... Visio MVP

Need stencils or ideas? http://www.mvps.org/visio/3rdparty.htm
Need VBA examples? http://www.mvps.org/visio/VBA.htm
Common Visio Questions http://www.mvps.org/visio/common_questions.htm
 
Top