Discussion :

[dumpill]

Bonjour à tous

Je souhaite ouvrir des fichiers d’assemblages d’un logiciel de dessin 3D à partir d’une UserForm sur Excel. Je suis tout d’abord passé par des liens hypertexte mais il se trouve que cette méthode empêche le recalcule de mon assemblage qui se met en carafe. Donc je suis passé par une condition « Shell » du genre

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Sub ShellOuvrir()
       Shell """C:\Program Files\Solid Edge V20\Program\Edge.exe"" ""C:\Documents and Settings\Nom du PC\Bureau\Lancement des carrosseries\Dossier Gamme Basse\Fourgon GB\Face AV STD.asm""", vbMaximizedFocus 
End Sub

Avec cette méthode, l’ouverture et le recalcule de mon assemblage se fait sans problème (relations entre les différentes pièces et dimensions des pièces). Cependant je suis obligé de répéter plusieurs fois

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Shell """C:\Program Files\Solid Edge V20\Program\Edge.exe"" ""C:\Documents and Settings\....

pour ouvrir plusieurs assemblages à la fois et du coup il m’ouvre autant de fois le logiciel 3D.
Pour être plus claire, pour « n » assemblage ouvert j’ai « n »fois le « Edge.exe » ouvert.
Est-ce que quelqu’un peut m’expliquer comment faire pour ouvrir plusieurs fichiers d’assemblage dans un seul « Edge.exe » ou m’aiguiller sur une autre méthode ?

Je vous remercie d’avance de l’attention apporté à mon problème.
Cordialement Le Dumpill

[decondelite]

Tu ne peux pas les ouvrir en rajoutant des arguments dans la même ligne?

[dumpill]

J’ai essayé de plusieurs manière différente comme :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
Sub ShellOuvrir()
       Shell """C:\Program Files\Solid Edge V20\Program\Edge.exe"" ""C:\Documents and Settings\Nom du PC\Bureau\Lancement des carrosseries\Dossier Gamme Basse\Fourgon GB\Face AV STD.asm"" ""C:\Documents and Settings\Nom du PC\Bureau\Lancement des carrosseries\Dossier Gamme Basse\Fourgon GB\Cadre AR STD.asm""", vbMaximizedFocus
End Sub
 
‘ou bien
 
Sub ShellOuvrir()
       Shell """C:\Program Files\Solid Edge V20\Program\Edge.exe"" ""C:\Documents and Settings\Nom du PC\Bureau\Lancement des carrosseries\Dossier Gamme Basse\Fourgon GB\Face AV STD.asm""&""C:\Documents and Settings\Nom du PC\Bureau\Lancement des carrosseries\Dossier Gamme Basse\Fourgon GB\Cadre AR STD.asm""", vbMaximizedFocus
End Sub

Et j’en passe…mais ça n’a rien donné…je n’ai que le premier assemblage qui s’ouvre.

[decondelite]

Essaye de mettre des virgules entre tes différents arguments.

[dumpill]

J'ai placé des virgule comme tu me dis mais j'en suis toujours au même point

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Sub ShellOuvrir()
       'Shell """C:\Program Files\Solid Edge V20\Program\Edge.exe"" ""C:\Documents and Settings\dhume\Bureau\Lancement des carrosseries\Dossier Gamme Basse\Fourgon GB\Face AV STD.asm"", ""C:\Documents and Settings\dhume\Bureau\Lancement des carrosseries\Dossier Gamme Basse\Fourgon GB\Assemblage pavillon.asm""", vbMaximizedFocus
End Sub

J'ai aussi rajouté/suprimé des guillemets, déplacé les virgules mais à part le plantage, rien...

Si j'ai faux...pas taper!!!