06-05-2024
07:54 PM
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report
06-05-2024
07:54 PM
Hi, here code to export to STEP
sub main()
path_and_name = ThisDoc.PathAndFileName(False) ' without extension
oDataMedium = ThisApplication.TransientObjects.CreateDataMedium
'Set the destination file name
oDataMedium.FileName = path_and_name & ".stp"
'Publish document.
ThisDoc.Document.SaveAs(oDataMedium.FileName , True)
end sub