Lista otwartych plików (vba SW16)

Witam

Szukam kodu VBA w solidworks 2016, zawierającego listę wszystkich otwartych plików (części, złożenia i rysunki).

Celem jest możliwość zabicia (zamknięcia bez zapisywania) wszystkich otwartych plików. 

Ideą kodu jest wyświetlenie listy otwartych dokumentów, a następnie za pomocą pętli uaktywnienie ich jeden po drugim i zamknięcie ich następującymi wierszami: 

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

Dziękuję za pomoc.

 

 

Witam

W Pomocy interfejsu API http://help.solidworks.com/2016/English/api/sldworksapi/Get_Names_of_Open_Documents_Example_VB.htm?verRedirect=1

2 polubienia

Świetnie, to działa