Hi,
Two colleagues and I work on one "master" spreadsheet with all of our
company products listing. Only one person at a tiime uses it.
I prefer high screen resolution 1024 x 768 whereas my colleagues prefer the
800 x 600?.

My spreadsheet is designed to fit the whole screen and rather than leaving
different zoom settings, I wonder if it is possible for a macro for a VBA
routine to detect the screen resolution and automatically select the
appropriate zoom (can define). Any assistance here would be greatly
appreciated.

Thanks in anticipation of any kind help.

Jeff Smith

Hi Jeff

A slightly different approach: This fills the/an Excel window with columns A:K no matter
which screen resolution used, no matter if the window is maximized or not:

Sub Test()
Columns("A:K").Select
ActiveWindow.Zoom = True
Range("A1").Select
End Sub

--
HTH. Best wishes Harald
Excel MVP

Followup to newsgroup only please.

"Jeff Smith" wrote in message ...
Hi,
Two colleagues and I work on one "master" spreadsheet with all of our
company products listing. Only one person at a tiime uses it.
I prefer high screen resolution 1024 x 768 whereas my colleagues prefer the
800 x 600?.

My spreadsheet is designed to fit the whole screen and rather than leaving
different zoom settings, I wonder if it is possible for a macro for a VBA
routine to detect the screen resolution and automatically select the
appropriate zoom (can define). Any assistance here would be greatly
appreciated.

Thanks in anticipation of any kind help.

Jeff Smith

Harald,
Thank you for this. I can see many applications for this small macro. I
have added it to the macros and it works fine.

I am very impressed with all the expert users who take the time to share
their experience and knowledge with others less skilled. Thank you.

sincerely

Jeff Smith

"Harald Staff" wrote in message
...
Hi Jeff

A slightly different approach: This fills the/an Excel window with columns
A:K no matter
which screen resolution used, no matter if the window is maximized or not:

Sub Test()
Columns("A:K").Select
ActiveWindow.Zoom = True
Range("A1").Select
End Sub

--
HTH. Best wishes Harald
Excel MVP

Followup to newsgroup only please.

"Jeff Smith" wrote in message
...
Hi,
Two colleagues and I work on one "master" spreadsheet with all of our
company products listing. Only one person at a tiime uses it.
I prefer high screen resolution 1024 x 768 whereas my colleagues prefer
the
800 x 600?.

My spreadsheet is designed to fit the whole screen and rather than
leaving
different zoom settings, I wonder if it is possible for a macro for a
VBA
routine to detect the screen resolution and automatically select the
appropriate zoom (can define). Any assistance here would be greatly
appreciated.

Thanks in anticipation of any kind help.

Jeff Smith

"Jeff Smith" wrote in message ...
Harald,
Thank you for this. I can see many applications for this small macro. I
have added it to the macros and it works fine.

Hi Jeff. you're welcome

I am very impressed with all the expert users who take the time to share
their experience and knowledge with others less skilled. Thank you.

This is a phenomenon that I talk about for hours whenever I get the chance. One thing is
"peace, love and everything for free" which works perfect here. Another thing is that
I/you as a person learn tons of stuff being here. And there's the communist idea "provide
what you can, receive what you need" thing. But the capitalist logic is fullfilled too;
There are times where I'm totally stuck on a database problem or similar. I ask someone in
a newsgroup like this or find something on a free website which solves my problem, and pay
back with a couple of hours of spreadsheet solutions. Everyone wins, I love it and,
luckily, so does my boss.

Best wishes Harald
Excel MVP

Followup to newsgroup only please.