Validation d'une fenetre d'exportation sur Visio2003

aendln Messages postés 7 Date d'inscription samedi 9 décembre 2000 Statut Membre Dernière intervention 1 juillet 2008 - 25 avril 2008 à 11:23
aendln Messages postés 7 Date d'inscription samedi 9 décembre 2000 Statut Membre Dernière intervention 1 juillet 2008 - 25 avril 2008 à 11:56
Bonjour,
je suis étudiant et dans le cadre de mon stage je dois créer une application visual basic qui controle l'exportation d'un dessin à distance.
J'arrive à ouvrir le Visio et le dessin ainsi que la fenetre exportation comme suit:

Dim Visio
As
New Visio.Application 'Création de l'application Visio

Dim Dessin
As Visio.Document

'Visio.Visible = False
Dessin = Visio.Documents.Open(FileName) 'Ouverture du dessin
Visio.DoCmd(1891) 'Ouverture de la fenetre d'exportation

Mon problème est que je n'arrive pas à automatiser l'appuie sur Ok de la fenetre exporter, et apres plusieur recherche et essai

(comme My.Computer.Keyboard.SendKeys(
"~",
True)
 ) je n'arrive toujour pas à trouver la solution

Je solicite donc votre aide et vous remercie par avance

1 réponse

aendln Messages postés 7 Date d'inscription samedi 9 décembre 2000 Statut Membre Dernière intervention 1 juillet 2008
25 avril 2008 à 11:56
Je crois que le probleme est qu'une fois cette instruction lancé les autre instructions ne s'éxecute plus car elle attend une reponse. Mais je ne sais toujours pas comment faire
0