topic Re: Replace styles in Drawing in Inventor Programming Forum

Replace styles in Drawing

Rene-J — Fri, 24 Aug 2012 09:52:34 GMT

I have some styles I will like to replace in some drawings

but how? I cant find any function to do this.

Do I missing some thing ?

Dim oIDWStyles As Inventor.DrawingStylesManager
Set oIDWStyles = oDrawDoc.StylesManager
Dim oldstyle As style
Dim Newstyle As style
   For Each oldstyle In oIDWStyles.Styles
     If oldstyle.Name = "Old style" Then
       ' Debug.Print oldstyle.Name & " : " & oldstyle.InternalName
        For Each Newstyle In oIDWStyles.Styles
          If Newstyle.Name = "New style" Then
            'Debug.Print Newstyle.Name & " : " & Newstyle.InternalName
            End If
        Next
        'How to replace oldstyle with newstyle
         'oldstyle = Newstyle

     End If
   Next

René J

Re: Replace styles in Drawing

cmines — Fri, 24 Aug 2012 12:31:06 GMT

This worked for me:

' Create the parts list and set a reference to it.
    Dim oPartsList As PartsList

    Set oPartsList = oSheet.PartsLists.Add(oDrawingView1, oPlacementPoint)
    oPartsList.Style = oDrawDoc.StylesManager.PartsListStyles.Item("PARTS LIST PART")

Hope this helps.

Chris

Re: Replace styles in Drawing

jdkriek — Fri, 24 Aug 2012 12:53:58 GMT

You can rename it, delete it, set another style as the object default, but no direct replace that I know of.

If you set the new styles as object defaults, then you could change all elements to the active standard.

Re: Replace styles in Drawing

cmines — Fri, 24 Aug 2012 12:57:29 GMT

UGHHHH....I swear I read "parts list style" the first time I read your post! Thats what I get for responding before I've had some caffeine!

Re: Replace styles in Drawing

jdkriek — Fri, 24 Aug 2012 13:04:39 GMT

Get some coffee, it will be alright - for a Friday 😉

Re: Replace styles in Drawing

Rene-J — Wed, 05 Sep 2012 15:59:57 GMT

Thanks Jonathan

Finally I got the time, to look at your suggestion.

I'm sorry I have not commented earlier, I've been on vacation.

I thought there was an easier solution.

René J