Inventor Customization

Inventor Customization

*Expert Elite*
Posts: 47
Registered: ‎02-18-2009
Message 1 of 1 (129 Views)

put back static value status iin revision table

129 Views, 0 Replies
04-21-2011 11:50 PM

we worked out this piece of code to reset all cells from the approved folder in the revision table.

but it's not working, is it because this function does not exist for the revision table? It does work for the partslist :s


Public Sub RevisionTableMult()

Dim invDDoc As DrawingDocument
Dim invPL As RevisionTable
Dim invPLCell As RevisionTableCell
Dim intRow As Integer
Dim invPLRow As RevisionTableRow

    Set invDDoc = ThisApplication.ActiveDocument
    Set invPL = invDDoc.ActiveSheet.RevisionTables.Item(1)
     For intRow = 1 To invPL.RevisionTableRows.Count
        Set invPLRow = invPL.RevisionTableRows.Item(intRow)
       Set invPLCell = invPLRow.Item("APPROVED")
'resets the cell back to the parametric value...
         invPLCell.Static = Active
    Next intRow

End Sub

If this is the solution, push the solution button :smileywink: (and maybe some kudos)

Are you familiar with the Autodesk Expert Elites? The Expert Elite program is made up of customers that help other customers by sharing knowledge and exemplifying an engaging style of collaboration. To learn more, please visit our Expert Elite website.
Need installation help?

Start with some of our most frequented solutions or visit the Installation and Licensing Forum to get help installing your software.