I also tried to imitated these conditions, and also got only TRUE values for WasResolved, since the value cleary wasn't as is shown in the attached image below. Using SOLIDWORKS 2023. image.png Used the code below to create the resultes in immediate windows. Option Explicit Sub main() Dim swApp As S...

Hi mp3-250 , There are a few examples on codestack.net Macro Feature - Add Watermark Feature - Model Configurator - Link And Auto Update General Table To Excel - Generate Box Geometry - Link Cut-List Custom Properties To File Custom Properties - Automatically Run Macro On Model Load - Create MultiBo...

Hi Craig, the code below will give a unique color to each component in a assembly. Thought I'd drop it here since you asked about it in our PMs. ' ################################################### ' # Title: Random Colorize Components # ' # Version: 24.1.26 # ' # Author: Stefan Sterk # ' #########...

As gupta said, the code of artem will fit your need, straid out of the box.

Got some other info. The index for 'Last Saved With SW' doens't seems to be contant. On my Windows 11 system is is set on 330 instead of 336 (Windows 10). Not sure if it is Windows related or user setting.

Tera wrote: ↑Thu Jan 11, 2024 8:09 pm I haven't reviewed @artem code yet, but your code returns null values.
What does 336 stands for?

Thanks.

336 is the index for 'Last Saved With SW' extended file attribute/detail. A value that can be shown in the file explorer. See image below. This is working for me

Hi Tera, Have a look at https://www.codestack.net/solidworks-api/document/versions-report/ artem code used the solidworks application to get the version history. Which limits the speed. A faster way is to get the file atribute 'Last Saved With SW' itself, see example code below Sub main() Debug.Prin...

Hi Craig Makarowski , See code below. 2023-11-24-01-16-35.gif Option Explicit Sub main() Dim swApp As SldWorks.SldWorks Dim swDoc As SldWorks.ModelDoc2 Dim swFeat As SldWorks.Feature Dim R() As Double, G() As Double, B() As Double Dim vMatVal(8) As Double Dim i As Long: i = -1 Set swApp = Applicatio...

Here is a simple macro which gives you the power to easily reset your light sources within a SOLIDWORKS Part or Assembly model by deleting the current light sources and adding back the 'default' (user specified) light sources. Option Explicit Sub main() Dim swApp As SldWorks.SldWorks Dim swModel As ...

Awesome Stuff @xitter. Keep up the work!

I noticed that there are a few lines you should remove at the start.

mme wrote: ↑Tue Oct 24, 2023 9:42 am Open part or assemblies. Run the macro. Enter a new name. If there is a drawing, it will put the same name on the drawing.

Hi @mme,
Sounds the same as this macro; https://www.codestack.net/solidworks-ap ... t-drawing/

Hi Mmike4 Here is a example on how you could get the name without the instance ID. Copy component name to the component reference using SOLIDWORKS API (codestack.net) '********************** 'Copyright(C) 2023 Xarial Pty Limited 'Reference: https://www.codestack.net/solidworks-api/document/assembly/...

I believe the selected component is Ligthweight, which will throw an error when pulling the custom properties.

Codestack.net also says to use 20x20px for SOLIDWORKS newer then 2015. "Optionally specify the icon. For SOLIDWORKS 2015 or older use 16 by 16 bitmap, for all newer version use 20 by 20 bitmap. Use white color as the transparency key." SOLIDWORKS icon size on macro features also starts at ...

Rather than muck around with temporarily renaming things, you can simply post process the STEP file. It's text after all. The components are identified by the name followed by an underscore and then the configuration name. If you use C# or VB.NET you have a Regex.Replace method you can use to prepe...

simple answer, yes you can. check Name2 . 1. open assembly 2. traverse through components 2.a rename component with Name2 . 2.b list comp in already renamed list 3.SaveAs (Export) 4.close assembly without saving. aslong as you dont save the document(s) the name changes wil only be in memory. other l...

Does using the SaveAs3 method from IModelDocExtension give a different result?

Hi colt , Replace swOpenDocOptions_e.swOpenDocOptions_Silent with Empty or -1 . swOpenDocOptions_e.swOpenDocOptions_Silent suppresses the warning dialogs like missing file. Set res = swApp.OpenDoc6(fileP , swDocumentTypes_e.swDocDRAWING, Empty, "", err, warn) Instead of Set res = swApp.Ope...

I got this macro (Code below) that opens the file location in the Windows Explorer for the selected component. Option Explicit Sub main() Dim swApp As SldWorks.SldWorks Dim swModel As SldWorks.ModelDoc2 Dim swSelMgr As SldWorks.SelectionMgr Dim swComponent As SldWorks.Component2 Dim Path As String S...

Yes you can. I got a macro that give me the ability to change the properties of a compenent that is selected in a drawing BOM.

I made this post to express my dissatisfaction with how Solidworks and our VAR are handling this, and I'd like to hear your thoughts. I mean, is it just me? () So Solidworks introduced the ‘ Dissolve part level rows ’ option under ‘Detailed cut list’ in the bill of materials (BOM) options for Solidw...

I contacted API Support and they suggest using AddMate5 with swMateCOORDINATE, which will align the axes. The code snippet below works as expected. Have fun with it ;) Sub main() Dim swApp As SldWorks.SldWorks Dim swModel As SldWorks.ModelDoc2 Dim swAsm As SldWorks.AssemblyDoc Dim swSelMgr As SldWor...

Hi Zhen, The code that follows fulfills your request. The only issue I can identify is that the Origin Axes don't align as they would if I did it manually. grumph Sub main() Dim swApp As SldWorks.SldWorks Dim swModel As SldWorks.ModelDoc2 Dim swAsm As SldWorks.AssemblyDoc Dim swSelMgr As SldWorks.Se...

I start by making a list of unique components and then loop through it. as demonstrated by the code below Option Explicit Sub main() Dim swApp As SldWorks.SldWorks Dim swModel As SldWorks.ModelDoc2 Dim swUniqueCompList() As SldWorks.Component2 Dim swComp As SldWorks.Component2 Dim vComp As Variant S...

I'm running SW2021 SP5.1 and i do get the same behavior, and not just with the API calls, it also happens when just going to ⚙️ Options and click ing on the OK button does enable the floor shadow and reflection on none active configurations. ChangingDocumentPropertiesEnablesFloorShadowForNoneActiveC...

Why would you perform the export twice and not just copy paste the file that you have exported with the FileCopy function? FirstPathName = FilePath & SaveFileName & "-" & Rev & ".STEP" SecondPathName = FilePathDump & SaveFileName & "-" & Rev ...

The code below will put the bodies in a cut-list and add a custom property with the name of the body. Which you can link to a drawing note. And it also change the name of the cutlist folder to the name off the body with an extra space at the end. Let me know how it goes. Option Explicit ' Name of th...

Hi Peter, Have you tried making a Cut-List by going to the Weldments tab and then clicking on the Weldment command. image.png You can then add properties to the cut list item, a partname for example. image.png image.png Which then can be linked to the drawing notes. image.png I believe there are som...

Hey Stefan! I am using Resolved, but my SolidWorks is in french rather then english. Could that be the cause? This is the error I get on Visual Basic. 2nd image to show how I selected. 3rd image to show file location. image.png image.png image.png language shouldn't be the issue. That error you get...

Hi Stephan, I've followed the instructions in your video, but nothing happens when I use the mouse gesture; no feedback of any sort. The drawings are in the same directory as the models and the filenames are identical. Any suggestions? Thanks Stefan, I've downloaded the macro and shared it with my ...

Well Hello, For those who wanna open a drawing directly from another drawing BOM. Stop searching for a solution because this post will give you on. Happy reading, wachting and opening drawings. Note: The drawings needs to be in the same folder and having the same filename as the part/assembly you wa...