We are trying to run a custom task where we can run a batch of assemblies and parts in the same lighting setup and isometric.

The isometric view macro runs fine 

Dim swApp As SldWorks.SldWorks

Dim swModel As ModelDoc2

Dim sFileName As String

Dim FileType As String
Dim Path As String

Dim CurrentFileName As String
Dim NewFileName As String

Dim boolstatus As Boolean
Dim longstatus As Long
Dim nErrors As Long
Dim