VBA - Polecenie sprawdzające, czy dokument jest aktywny

Witam

Które polecenie określa, czy dokument jest aktywny? Celem byłoby opuszczenie mojego programu, jeśli go nie ma.

Dziękuję za pomoc :)

Witam

Powinieneś użyć activedoc:

http://help.solidworks.com/2012/English/api/sldworksapi/SolidWorks.Interop.sldworks~SolidWorks.Interop.sldworks.ISldWorks~ActiveDoc.html

Zwraca wartość NULL, jeśli żadne dokumenty nie są aktywne.

Ustaw swModel = swApp.ActiveDoc

Jeśli isnull(swModel), to ...

A może:

Robić

Ustaw swModel = swApp.ActiveDoc

Pętla , podczas gdy isnull(swModel) = false

 

Funkcja zawsze zwraca to samo, gdy dokument jest otwarty lub nie. Używam poniższego kodu:

Dim swmodel As SldWorks.ModelDoc2

Jeśli IsNull(swmoddel) = False, wyjdź z sub

 

Spróbuj zainspirować się tym makro, a następnie:

http://www.lynkoa.com/tutos/import-export-formats-neutres/macro-solidworks-obtenir-le-nom-des-documents-ouverts