Solidworks VBA Macro - Update Break Line Type
Objective
Objective of this article is simple, answer the below question.
How to Update Break line Type in a drawing from Solidworks VBA macro.
Final Result
Final result as shown below ๐๐ป
Macro Video
Below ๐ฌ video shows how to Update Break Line Type from SOLIDWORKS VBA Macros.
Above video is just for visualization and there is no explanation.
It is advisable to watch video, since it helps you to better understand the process.
VBA Macro
Below is the VBA macro for Update Break Line Type.
Option Explicit
' Creating variable for Solidworks application
Dim swApp As SldWorks.SldWorks
' Creating variable for Solidworks document
Dim swDoc As SldWorks.ModelDoc2
' Creating variable for Solidworks Drawing
Dim swDrawing As SldWorks.DrawingDoc
' Creating variable for Solidworks View
Dim swView As SldWorks.View
' Creating variable for Solidworks Breakline
Dim swBreakLine As SldWorks.BreakLine
' Program to Update Break line Type
Sub main()
' Setting Solidworks variable to Solidworks application
Set swApp = Application.SldWorks
' Set Solidworks document variable to currently opened document
Set swDoc = swApp.ActiveDoc
' Check if Solidworks document is opened or not
If swDoc Is Nothing Then
MsgBox "Solidworks document is not opened."
Exit Sub
End If
' Set Solidworks Drawing document variable
Set swDrawing = swDoc
' Get activate view
Set swView = swDrawing.ActiveDrawingView
' Variable for Break lines
Dim breaks As Variant
' Get Break lines in current view
breaks = swView.GetBreakLines
' Get first break line and set Solidworks Breakline variable
Set swBreakLine = breaks(0)
' Set Straight Line style
swBreakLine.Style = swBreakLineStyle_e.swBreakLine_Straight
' Rebuild document
swDoc.ForceRebuild3 True
End Sub
Prerequisite
There are some prerequisites for this article.
- Knowledge of VBA programming language isโrequired.
As shown in above ๐๐ป image:
- We arleady selected view.
- Current Line Style: Zig Zag Cut
If you want to Insert Break view in a drawing programmatically then please refer to below article.
Additionally, if you want to Update Break Line Position in a drawing programmatically then please refer to below article.
We will apply checks in this article, so the code we write, should be error free mostly.
Steps To Follow
This VBA macro can be divided into following sections:
- Create Global Variables
- Initialize Variables
- Update Break line Type
Every section with each line is explained below.
I also give some links (see icon ๐) so that you can go through them if there are anything I explained in previous articles.
Create Global Variables
In this section, we create global variables.
Option Explicit
- Purpose: Above line forces us to define every variable we are going to use.
- Reference: ๐ SOLIDWORKS Macros - Open new Part document article.
' Variable for Solidworks application
Dim swApp As SldWorks.SldWorks
- Purpose: In above line, we create a variable for Solidworks application.
- Variable Name:
swApp
- Type:
SldWorks.SldWorks
- Reference: Please visit ๐ online SOLIDWORKS API Help.
' Variable for Solidworks document
Dim swDoc As SldWorks.ModelDoc2
- Purpose: In above line, we create a variable for Solidworks document.
- Variable Name:
swDoc
- Type:
SldWorks.ModelDoc2
- Reference: Please visit ๐ online SOLIDWORKS API Help.
' Creating variable for Solidworks Drawing
Dim swDrawing As SldWorks.DrawingDoc
- Purpose: In above line, we create a variable for Solidworks Drawing.
- Variable Name:
swDrawing
- Type:
SldWorks.DrawingDoc
- Reference: Please visit ๐ online SOLIDWORKS API Help.
' Creating variable for Solidworks View
Dim swView As SldWorks.View
- Purpose: In above line, we create a variable for Solidworks View.
- Variable Name:
swView
- Type:
SldWorks.View
- Reference: Please visit ๐ online SOLIDWORKS API Help.
' Creating variable for Solidworks Breakline
Dim swBreakLine As SldWorks.BreakLine
- Purpose: In above line, we create a variable for Solidworks Breakline.
- Variable Name:
swBreakLine
- Type:
SldWorks.BreakLine
- Reference: Please visit ๐ online SOLIDWORKS API Help.
These all are our global variables.
They are SOLIDWORKS API Objects.
' Program to Update Break line type
Sub main()
End Sub
- In above line, we create Program to Update Break line type.
- This is a
Sub
procedure which has name ofmain
. - This procedure hold all the statements (instructions) we give to computer.
- Reference: Detailed information ๐ VBA Sub and Function Procedures article of this website.
Initialize Variables
In this section, we initialize Variables.
' Set Solidworks Application variable to current application
Set swApp = Application.SldWorks
- In above line, we set value of
swApp
variable. - This value is currently opened Solidworks application.
' Set Solidworks document variable to currently opened document
Set swDoc = swApp.ActiveDoc
- In above line, we set value of
swDoc
variable. - This value is currently opened part document.
' Check if Solidworks document is opened or not
If swDoc Is Nothing Then
MsgBox ("Solidworks document is not opened.")
Exit Sub
End If
- In above code block, we check if we successfully set the value of
swDoc
variable. - We use ๐ IF statement for checking.
- Condition:
swDoc Is Nothing
- When this condition is
True
,- We show and ๐ message window to user.
- Message: SOLIDWORKS document is not opened.
- Then we stop our macro here.
' Set Solidworks Drawing document
Set swDrawing = swDoc
- In above line, we set value of
swDrawing
variable. - This value is
swDoc
variable.
' Get activate view
Set swView = swDrawing.ActiveDrawingView
- In above line, we set value of
swView
variable. - This value is currently selected view.
- We get value by
ActiveDrawingView
method. - This
ActiveDrawingView
method is part ofswDrawing
variable.
' Check if view is selected or not
If swView Is Nothing Then
MsgBox "No view selected."
Exit Sub
End If
- In above code block, we check if we successfully get the value of
swView
variable. - We use ๐ IF statement for checking.
- Condition:
swView Is Nothing
- When this condition is
True
,- We show and ๐ message window to user.
- Message: No view selected.
- Then we stop our macro here.
Update Break line position
In this section, we Update Break line position.
' Variable for Break lines
Dim breaks As Variant
- Purpose: In above line, we create a variable for getting Break lines from current views.
- Variable Name:
breaks
- Type:
Variant
' Get Break lines in current view
breaks = swView.GetBreakLines
- In above code, we get Break lines in current view.
- Then we set the value of
breaks
variable. - For this, we use
GetBreakLines
method. - This
GetBreakLines
method is part ofswView
variable. - This method did not take any parameter.
- Return Value : This
GetBreakLines
method returns Solidworks Break line. - Reference: For more details please visit ๐ online SOLIDWORKS API Help.
' Get first break line and set Solidworks Breakline variable
Set swBreakLine = breaks(0)
- In above line, we get first break line.
- Then we set the value of Solidworks Breakline variable
swBreakLine
.
' Set Straight Line style
swBreakLine.Style = swBreakLineStyle_e.swBreakLine_Straight
- In above code, we Set Straight Line style.
- For this, we use
Style
property. - This
Style
property is part ofswBreakLine
variable. - We set the value of this
Style
property to value ofswBreakLineStyle_e.swBreakLine_Straight
variable. -
swBreakLineStyle_e
has multiple values for different styles as explained below.-
Type - Type of Styles are defined in
swBreakLineStyle_e
:Member Description swBreakLine_Curve
3 swBreakLine_Jagged
5 swBreakLine_SmallZigZag
4 swBreakLine_Straight
1 swBreakLine_ZigZag
2
-
- You can select type of style from above values as per requirement.
' Rebuild drawing
swDoc.ForceRebuild3 True
- In above line, we Rebuild drawing.
- For this we use
ForceRebuild3
method which is part of SOLIDWORKS Document variable i.eswDoc
variable.
Now we run the macro and after running macro we show selected component as shown in below image.
This is it !!!
I hope my efforts will helpful to someone! ๐
If you found anything to add or update, please let me know on my e-mail ๐ง.
Hope this post helps you to Update Break Line Type with SOLIDWORKS VBA Macros.
For more such tutorials on SOLIDWORKS VBA Macro, do come to this website after sometime.
If you like the post then please share it with your friends also. ๐๐ป
Do let me know by you like this post or not!
Till then, Happy learning!!!