Function ColorSchemes.Activate() changes IconsColor to Cobalt
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report
Hello,
I want to create a code that will change the background on each of the parts in assembly to white. I decided to do it by changing the background to white and then opening each file in assembly and saving it.
The problem is that when I use a demo code below, it also changes the Icons' Color Theme to Cobalt. The problem is that, for some reason, it takes an insane amount of time, especially if I will try to change it back.
Sub Test()
ThisApplication.ColorSchemes.Item(7).Activate() 'That is when it changes Icons' appearance ThisApplication.ColorSchemes.BackgroundType = kOneColorBackgroundType ThisApplication.ColorSchemes.IconsColor = kAmberColorTheme 'That is how I change it back End Sub
The interesting part is that ColorSchemes.Activate() will work almost instantly is the icons are already Cobalt. It sparked an idea that this rub may lie in the Color Scheme's options, yet I wasn't able to find even a trace of it neither in the API documentation nor in the Color Scheme Editor.
So there are two questions - why this code changes Icons' appearance, and how to work around that?
Any help is appreciated, thank you!