Comment lancer Visio 2007 à partir de VB ?

Pourquoi avec le code source suivant j'arrive sans problème à lancer Word 2007 ou Excel 2007 et que cela ne fonctionne pas avec Visio 2007 ?

Ce code ouvre Word 2007 !

Dim WordApp as object
WordApp = CreateObject("word.application")
WordApp.visible = True

Ce code provoque une erreur de compilation !

Dim VisioApp as object
VisioApp = CreateObject("visio.application")
VisioApp.visible = True

en me disant Type "Visio.application" non défini !

Peut être est ce un problème avec VISLIB.DLL qui ne serait pas répertoriée dans Projet - Reférence ?

Que faire ?

Salut,

Je ne suis pas un pro de VB .NET, mais pour lancer Visio depuis VB, tu peux aussi utiliser la fonction "Shell" ;)

Exemple pour Visio 2007 :

Code:

---

1 2 3

Shell("C:\Program Files\Microsoft Office\Office12\VISIO.EXE", AppWinStyle.NormalFocus, False)

---

En espèrant que cela te soit utile, bon courage :D