Blue Screen Macro

[Hophead]

I used to have a simple macro I attached to a button that pressing once would
turn blue screen on and pressing again would turn it off. Unfortunately, I
lost it in a hard drive crash. I do most of my writing and editing in blue
screen but some graphics don't appear and I need to switch to white to view
them. It is cumbersome to navigate the menus to switch. Does anybody know
this macro?

 

[Tony Jollans]

You need to set Options.BlueScreen to True or False or, for a toggle as you
describe, to the opposite of its current value.

Sub ToggleBlueScreen()
Options.blueScreen = Not Options.BlueScreen
End Sub

 

[Michael Bednarek]

I used to have a simple macro I attached to a button that pressing once would
turn blue screen on and pressing again would turn it off. Unfortunately, I
lost it in a hard drive crash. I do most of my writing and editing in blue
screen but some graphics don't appear and I need to switch to white to view
them. It is cumbersome to navigate the menus to switch. Does anybody know
this macro?

Options.BlueScreen = Not Options.BlueScreen

 

[Hophead]

Thanks so much to Tony and Michael! This simple macro was just what I needed.
I have saved it as a text file on my backup drive so I won't lose it again.