Announcements
Attention for Customers without Multi-Factor Authentication or Single Sign-On - OTP Verification rolls out April 2025. Read all about it here.
dgreatice
in reply to: Anonymous

Hi,

 

try this:

 

Version:1.0 StartHTML:00000145 EndHTML:00002241 StartFragment:00000294 EndFragment:00002209 StartSelection:00000294 EndSelection:00000294SyntaxEditor Code Snippet

Dim oApp As Application
Dim oPD As PartDocument
Dim oPCD As PartComponentDefinition
Dim oSurfBody As SurfaceBody

oApp = ThisApplication
oPD = oApp.ActiveDocument
oPCD = oPD.ComponentDefinition

For Each oSurfBody In oPCD.SurfaceBodies
    If oSurfBody.Name = "Sliderail" Then
        oSurfBody.Visible = False
    End If
Next

Please use the ACCEPT AS SOLUTION or KUDOS button if my Idea helped you to solve the problem.

Autodesk Inventor Professional Certified 2014