View Single Post
  #5   Report Post  
Posted to microsoft.public.excel.programming
NickHK NickHK is offline
external usenet poster
 
Posts: 4,391
Default Change Options under ToolsOptioonsView Tab When User Opens Workbook

Minitman,
On a WS (maybe hidden), in Workbook_Open, something like:

Dim rng As Range
Set rng = ThisWorkbook.Worksheets("Settings").Range("Home")

With ActiveWindow
rng.Offset(1, 0).Value = .DisplayFormulas
rng.Offset(2, 0).Value = .DisplayGridlines
'.............
End With
rng.Offset(3, 0).Value = ActiveSheet.DisplayAutomaticPageBreaks
rng.Offset(4, 0).Value = ActiveWorkbook.DisplayDrawingObjects
With Application
rng.Offset(5, 0).Value = .DisplayFormulaBar
rng.Offset(6, 0).Value = .DisplayStatusBar
'.......................
End With
End Sub

And then on closing, do the opposite:
With ActiveWindow
.DisplayFormulas=rng.Offset(1, 0).Value
.DisplayGridlines=rng.Offset(2, 0).Value
'.............

You probably will not need to change all the settings, but you get the idea.

NickHK

"Minitman" wrote in message
...
Hey NickHK,

I stand corrected. The recorder did work (I accidentally hid the
thing and it kept on recording and then crashed Excel. I cleared out
the module and tried again. This time it worked)

I am still wondering as to how and where to record the original
settings.

Any help on this would be most appreciated.

TIA

-Minitman

On Wed, 28 Sep 2005 05:51:38 -0500, Minitman
wrote:

Hey NickHK,

Thanks for the reply. I tried that and found that what I wanted to
change was grayed out when I had the recorder on.

The part about recording the current setting is a good idea. How do I
do that?

TIA

-Minitman



On Wed, 28 Sep 2005 15:08:10 +0800, "NickHK"
wrote:

Minitman,
Sure, record a macro whilst you change the options.
You'll see some are members of Application whilst others are window or

sheet
specific.

It's a good idea to save the initial settings so when you WS closes it

can
reset them to the user-desired setup.
It is very annoying otherwise.

NickHK

"Minitman" wrote in message
. ..
Greetings

I need to make sure that some of the options under ToolsOptionsView
tab are unchecked.

Is there anyway to do this when the workbook is opened?

Any help would be appreciated.

TIA

-Minitman