Home and 100% on all sheets in a workbook

[Roundy]

I am wondering if anyone could help me with some code to set the view
settings for all of my sheets to 100% zoom, and select cell A1...or rather be
in the "control home" position. I could certainly record a macro...but that
can be time consuming and inefficient as I have 64 worksheets in my
workbook. Thanks in advance for the help.

[Roundy]

Found the answer and adapted it...so here is what worked.

For Each Sheet In ThisWorkbook.Worksheets
Sheet.Activate
ActiveWindow.Zoom = 100
Range("A1").Select
Next

"Roundy" wrote:

> I am wondering if anyone could help me with some code to set the view
> settings for all of my sheets to 100% zoom, and select cell A1...or rather be
> in the "control home" position. I could certainly record a macro...but that
> can be time consuming and inefficient as I have 64 worksheets in my
> workbook. Thanks in advance for the help.

[Roundy]

I spoke to soon. It does select the cell I request...but the effect I am
looking for is that of Cntrl Home which moves A1 into view? Any help on this
one?

"Roundy" wrote:

> Found the answer and adapted it...so here is what worked.
>
> For Each Sheet In ThisWorkbook.Worksheets
> Sheet.Activate
> ActiveWindow.Zoom = 100
> Range("A1").Select
> Next
>
> "Roundy" wrote:
>
> > I am wondering if anyone could help me with some code to set the view
> > settings for all of my sheets to 100% zoom, and select cell A1...or rather be
> > in the "control home" position. I could certainly record a macro...but that
> > can be time consuming and inefficient as I have 64 worksheets in my
> > workbook. Thanks in advance for the help.