![]() ' Debug.Print objProps.Name, ": ", objProp.Name, " = ", objProp.Value Set objPropSets = CreateObject("SolidEdge.FileProperties")Ĭall objPropSets.Open("c:\temp\Part1.par") The sample code below can be modified to suit your needs: ![]() That your project has a reference to the type library called "Solid Edge File How do you extract the file properties for a Solid Edge file using VBĪll the file properties that are listed under the "File/Properties" dialog canīe extracted by a VB propgram or a VBA macro in a spreadsheet. Can anyone take a crack at this thing, and make it work as a macro for excel? I found some code below, but I believe it needs some tweeking. ![]() I want to extract my file properties to a spread sheet.
0 Comments
Leave a Reply. |