Liste des fichiers ouverts (vba SW16)

Salut,

Je cherche un code en VBA sur solidworks 2016, me listant tous les fichiers ouverts (pièces, assemblages et mises en plan).

L'objectif c'est de pouvoir killer (fermer sans enregistre) tous les fichiers ouverts. 

L'idée du code c'est de lister les documents ouverts, puis par une boucle les rendre actifs un par un et les fermer grâce aux lignes suivantes : 

Set swApp = Application.SldWorks
Set swModel = swApp.ActiveDoc
swApp.CloseDoc swModel.GetTitle

Merci pour votre aide.

 

 

Bonjour,

Dans l'aide de l'API, http://help.solidworks.com/2016/English/api/sldworksapi/Get_Names_of_Open_Documents_Example_VB.htm?verRedirect=1

2 « J'aime »

Super ça marche