Inventor Customization

Reply
Distinguished Contributor
Rene-J
Posts: 308
Registered: ‎05-07-2005
Message 1 of 6 (451 Views)

Replace styles in Drawing

451 Views, 5 Replies
08-24-2012 02:52 AM

Hi

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

Contributor
cmines
Posts: 21
Registered: ‎06-08-2012
Message 2 of 6 (443 Views)

Re: Replace styles in Drawing

08-24-2012 05:31 AM in reply to: Rene-J

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

*Expert Elite*
jdkriek
Posts: 545
Registered: ‎03-29-2007
Message 3 of 6 (441 Views)

Re: Replace styles in Drawing

08-24-2012 05:43 AM in reply to: Rene-J

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.

Jonathan D. Kriek

Autodesk Inventor Certified Expert
Microsoft Certified Application Developer
_____________________________________________________
Did I help you? Please choose Accept as Solution or Kudos below
Contributor
cmines
Posts: 21
Registered: ‎06-08-2012
Message 4 of 6 (434 Views)

Re: Replace styles in Drawing

08-24-2012 05:57 AM in reply to: jdkriek

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!

 

*Expert Elite*
jdkriek
Posts: 545
Registered: ‎03-29-2007
Message 5 of 6 (432 Views)

Re: Replace styles in Drawing

08-24-2012 06:04 AM in reply to: cmines

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

Jonathan D. Kriek

Autodesk Inventor Certified Expert
Microsoft Certified Application Developer
_____________________________________________________
Did I help you? Please choose Accept as Solution or Kudos below
Distinguished Contributor
Rene-J
Posts: 308
Registered: ‎05-07-2005
Message 6 of 6 (401 Views)

Re: Replace styles in Drawing

09-05-2012 08:59 AM in reply to: jdkriek

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

Post to the Community

Have questions about Autodesk products? Ask the community.

New Post
Announcements
Are You Going To Be @ AU 2014? Feel free to drop by our AU topic post and share your plans, plug a class that you're teaching, or simply check out who else from the community might be in attendance. Ohh and don't forgot to stop by the Autodesk Help | Learn | Collaborate booths in the Exhibit Hall and meet our community team if you get a chance!