List of open files (vba SW16)

3D Design Volume Model
1

Hello

I'm looking for a VBA code on solidworks 2016, listing all the open files (parts, assemblies and drawings).

The objective is to be able to kill (close without saving) all open files. 

The idea of the code is to list the open documents, then by a loop make them active one by one and close them with the following lines: 

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

Thank you for your help.

 

 

2

Hello

In the API Help, http://help.solidworks.com/2016/English/api/sldworksapi/Get_Names_of_Open_Documents_Example_VB.htm?verRedirect=1

2 Likes
3

Great it works