Change occurrence color, then reset it back to how it was before

[bshbsh]

Hi,

I'm changing colors (appearances) of occurrences within an interactive vba macro, then when it's done, they need to be changed back (reset) to how they were before.

But the way I do this (storing appearance and appearance source) doesn't work perfectly, as it discards any possible previous overrides. But dealing with overrides is really too awkward just for this.

Unless there's a simple way to achieve this, that I don't know of.

Making temporary design views isn't great either.

Does anyone have any hints or ideas how to do this?

[clutsa]

Can you try this? It undoes everything. 

Dim app As Inventor.Application = ThisApplication
Dim TransMgr As TransactionManager = app.TransactionManager
Dim myTrans As Transaction = TransMgr.StartTransaction(app.ActiveDocument,"ColorChanges")

'Your code here
'...
'...

myTrans.End
TransMgr.UndoTransaction

Otherwise you can use it in your code to break up sections and just undo those sections.