Ilogic Update styles on dwg (Inventor 2011)

[dclunie]

Hi

I am after a way of accessing the update styles on dwg so that I can run with rule below as most of our drawing stds have changed and old dwgs need updating the work flow is as follows.

1.  I need to access manage tab then update styles,then yes to all,OK
2. Update all sheets
3. find all parts list within all sheet and then annotate , style on format tab and then select Parts list - this will change all my old parts list to current style definition.
4. Either run at begining of code below or run as seperate code

ps : I am aware there is is a update style wizard it is not preferable to use in this case,

Regards

dave

On Error Resume Next
Dim oDrawDoc As DrawingDocument
    oDrawDoc = ThisApplication.ActiveDocument
Dim Sheet As Inventor.Sheet
Dim Cursheet As String
     Cursheet = oDrawDoc.ActiveSheet.Name
    
For Each oSheet In oDrawDoc.Sheets
        oSheet.Activate
Dim oPartsList As PartsList
    oPartsList = oDrawDoc.ActiveSheet.PartsLists.Item(1)
        If Not oPartsList Is Nothing Then
         Resume Next
    'Call oPartsList.Sort("ITEM")
	Call oPartsList.Sort("PART NUMBER", 1, "DESCRIPTION", 1, "QTY", 1)
iLogicVb.UpdateWhenDone = True
ActiveSheet = ThisDrawing.Sheet("Sheet:1")
ThisApplication.ActiveView.Fit


End If
    Next

[Rene-J]

Hi try Automatic update Drawing Resources http://www.mcadforums.com/forums/viewtopic.php?f=34&t=8018 René J

[dclunie]

HI

Unfortunately my inventor runs on windows 7 64 bit system and i see your program is incompatible

Regards

Dave

[Rene-J]

It has run on Win 7 64 and 32 bit in the last 2 years

René J

[dclunie]

Hi Rene

My misunderstanding I have installed it now and testing the results

But however I would still like to pursue a way of finding the code that would work via ilogic

regards

Dave