Hi

Im putting together a spreadsheet in Excel 97 and the user wants to be able
to use the full screen mode. (window is also maximised)

For most screen in the workbook this is ok as when FullScreenMode is
selected the verticle scroll bar remains visible and due to the nature of
the worksheet no horizontal scrolling is necessary - except on one sheet.

The horizontal scroll bar reamins invisible.

I have checked under tools options and the box is ticked to make it visible
I have also writen a small code module for a button on screen that toggles
the screen into full screen mode and sets the activewindows scrollbar to
visible (see code below) but the scrollbar remains hidden.

You can still move around the screen by using the arrow keys but the user is
adamant they want ot use the scrollbar (he who pays the piper and all
that...)

Any help please - as this is possibly the last (fingers crossed) outstanding
issue on this project.

Many thanks

GreenBoy

Heres the Code:

Sub MyFullScreen()
If Not Application.DisplayFullScreen Then
Application.DisplayFullScreen = True
ActiveWindow.DisplayHorizontalScrollBar = True

Else
Application.DisplayFullScreen = False
End If
End Sub

It kind of sounds like the horizontal scrollbar is just off the screen.

Or...

Can you see the worksheet tabs? If yes, then maybe they're covering the
scrollbar.

Try dragging the tab/scrollbar separator to the left.

GreenBoy wrote:

Hi

Im putting together a spreadsheet in Excel 97 and the user wants to be able
to use the full screen mode. (window is also maximised)

For most screen in the workbook this is ok as when FullScreenMode is
selected the verticle scroll bar remains visible and due to the nature of
the worksheet no horizontal scrolling is necessary - except on one sheet.

The horizontal scroll bar reamins invisible.

I have checked under tools options and the box is ticked to make it visible
I have also writen a small code module for a button on screen that toggles
the screen into full screen mode and sets the activewindows scrollbar to
visible (see code below) but the scrollbar remains hidden.

You can still move around the screen by using the arrow keys but the user is
adamant they want ot use the scrollbar (he who pays the piper and all
that...)

Any help please - as this is possibly the last (fingers crossed) outstanding
issue on this project.

Many thanks

GreenBoy

Heres the Code:

Sub MyFullScreen()
If Not Application.DisplayFullScreen Then
Application.DisplayFullScreen = True
ActiveWindow.DisplayHorizontalScrollBar = True

Else
Application.DisplayFullScreen = False
End If
End Sub

--

Dave Peterson

Dave

No - this is full screen as in the same as using the menu command View/ Full
Screen - which togles hiding sll of the tool bars (except the menu bar) and
the page tabs.

What is also does is hides the horizontal scroll bar but NOT the verticle.

I want to keep the horizontal one visible - thus my attempt at coding.

Many thanks for your thoughts.

GreenBoy

"Dave Peterson" wrote in message
...
It kind of sounds like the horizontal scrollbar is just off the screen.

Or...

Can you see the worksheet tabs? If yes, then maybe they're covering the
scrollbar.

Try dragging the tab/scrollbar separator to the left.

GreenBoy wrote:

Hi

Im putting together a spreadsheet in Excel 97 and the user wants to be
able
to use the full screen mode. (window is also maximised)

For most screen in the workbook this is ok as when FullScreenMode is
selected the verticle scroll bar remains visible and due to the nature
of
the worksheet no horizontal scrolling is necessary - except on one
sheet.

The horizontal scroll bar reamins invisible.

I have checked under tools options and the box is ticked to make it
visible
I have also writen a small code module for a button on screen that
toggles
the screen into full screen mode and sets the activewindows scrollbar to
visible (see code below) but the scrollbar remains hidden.

You can still move around the screen by using the arrow keys but the
user is
adamant they want ot use the scrollbar (he who pays the piper and all
that...)

Any help please - as this is possibly the last (fingers crossed)
outstanding
issue on this project.

Many thanks

GreenBoy

Heres the Code:

Sub MyFullScreen()
If Not Application.DisplayFullScreen Then
Application.DisplayFullScreen = True
ActiveWindow.DisplayHorizontalScrollBar = True

Else
Application.DisplayFullScreen = False
End If
End Sub

--

Dave Peterson

I don't think you can separate the visibility of the horizontal scrollbar from
the visibility of the horizontal scrollbar.

But even in FullScreen mode, I could size the window to "hide" portions of that
window.



GreenBoy wrote:

Dave

No - this is full screen as in the same as using the menu command View/ Full
Screen - which togles hiding sll of the tool bars (except the menu bar) and
the page tabs.

What is also does is hides the horizontal scroll bar but NOT the verticle.

I want to keep the horizontal one visible - thus my attempt at coding.

Many thanks for your thoughts.

GreenBoy

"Dave Peterson" wrote in message
...
It kind of sounds like the horizontal scrollbar is just off the screen.

Or...

Can you see the worksheet tabs? If yes, then maybe they're covering the
scrollbar.

Try dragging the tab/scrollbar separator to the left.

GreenBoy wrote:

Hi

Im putting together a spreadsheet in Excel 97 and the user wants to be
able
to use the full screen mode. (window is also maximised)

For most screen in the workbook this is ok as when FullScreenMode is
selected the verticle scroll bar remains visible and due to the nature
of
the worksheet no horizontal scrolling is necessary - except on one
sheet.

The horizontal scroll bar reamins invisible.

I have checked under tools options and the box is ticked to make it
visible
I have also writen a small code module for a button on screen that
toggles
the screen into full screen mode and sets the activewindows scrollbar to
visible (see code below) but the scrollbar remains hidden.

You can still move around the screen by using the arrow keys but the
user is
adamant they want ot use the scrollbar (he who pays the piper and all
that...)

Any help please - as this is possibly the last (fingers crossed)
outstanding
issue on this project.

Many thanks

GreenBoy

Heres the Code:

Sub MyFullScreen()
If Not Application.DisplayFullScreen Then
Application.DisplayFullScreen = True
ActiveWindow.DisplayHorizontalScrollBar = True

Else
Application.DisplayFullScreen = False
End If
End Sub

--

Dave Peterson


--

Dave Peterson