I need some help regarding .step files. I am trying to write a macro that opens a .step file and then saves it as .sldprt.
I used this functions:
Dim swApp As SldWorks.SldWorks
Dim swModel As SldWorks.ModelDoc2
dim Path as String
Dim Importdata As ImportStepData
Dim Errors As Long
Dim Err as Long
Dim Warn as long
Dim swModelDocExt As ModelDocExtension
Set swApp = Application.SldWorks
Path = "C:\...................\x.step"
Set Importdata = swApp.GetImportFileData(Path)
Set swModel = swApp.LoadFile4(Path, "r", Importdata, Errors)
set swModel = swApp.OpenDoc6(Path, 6, 1, "", Err, Warn)
set swModelDocExt = swModel.Extension
this macro does not open the .step file (Errors=1) and crashes at the line "set swModelDocExt = swModel.Extension". Could you help me with this problem?