Inventor Customization

Inventor Customization

Reply
Distinguished Contributor
320 Posts
12 Kudos
Registered: ‎05-07-2005
Post 1 of 6

Replace styles in Drawing

457 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
21 Posts
1 Kudo
Registered: ‎06-08-2012
Post 2 of 6

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*
546 Posts
106 Kudos
Registered: ‎03-29-2007
Post 3 of 6

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
Manufacturing Solutions Engineer
KETIV Technologies, Inc.



_____________________________________________________
Did I help you? Please choose Accept as Solution or Kudos below
Contributor
21 Posts
1 Kudo
Registered: ‎06-08-2012
Post 4 of 6

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*
546 Posts
106 Kudos
Registered: ‎03-29-2007
Post 5 of 6

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
Manufacturing Solutions Engineer
KETIV Technologies, Inc.



_____________________________________________________
Did I help you? Please choose Accept as Solution or Kudos below
Distinguished Contributor
320 Posts
12 Kudos
Registered: ‎05-07-2005
Post 6 of 6

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 interested in helping shape the future of the Autodesk Community? To participate in this brief usability study, please click here. Your time and input is greatly appreciated!