PC Review


Reply
Thread Tools Rate Thread

display in web page format & paging

 
 
=?Utf-8?B?R3JycnJydW1weQ==?=
Guest
Posts: n/a
 
      2nd Apr 2007
In an Excel 2003 spreadsheet, I have my layouts in sheet1, my data is input
for these layouts are inputted from sheet2.
The layouts consist of 28-30 rows (this can be changed to fit on a screen).
I want to display on the screen the 30 rows of sheet1.
A laptop will be connected to a big screen TV so it can be viewed in a large
room.
I want to pause a few seconds, page down and display the next 28 or 30
rows, pause, page down...etc.
When I reach the bottom, I want to go to the top and start the display
again. The display should be in "web page format" or "print preview format".
To stop the process, the user press the ESC key.

This has done before. It displays groups of 4 teams in a round robin format
that
is updated during the event. The previous code was limited to 72 teams - 18
screens. It needs to be expanded. The macros were pass protected and are
unaccessible.

How do I do put the worksheet in webpage format and page down thru it?

Thanks
Joe

 
Reply With Quote
 
 
 
 
NickHK
Guest
Posts: n/a
 
      3rd Apr 2007
Can't you just edit the code you have from before, change the 4 to 18.

NickHK

"Grrrrrumpy" <(E-Mail Removed)> wrote in message
news:3C18552E-0AA6-4FC1-9338-(E-Mail Removed)...
> In an Excel 2003 spreadsheet, I have my layouts in sheet1, my data is

input
> for these layouts are inputted from sheet2.
> The layouts consist of 28-30 rows (this can be changed to fit on a

screen).
> I want to display on the screen the 30 rows of sheet1.
> A laptop will be connected to a big screen TV so it can be viewed in a

large
> room.
> I want to pause a few seconds, page down and display the next 28 or 30
> rows, pause, page down...etc.
> When I reach the bottom, I want to go to the top and start the display
> again. The display should be in "web page format" or "print preview

format".
> To stop the process, the user press the ESC key.
>
> This has done before. It displays groups of 4 teams in a round robin

format
> that
> is updated during the event. The previous code was limited to 72 teams -

18
> screens. It needs to be expanded. The macros were pass protected and are
> unaccessible.
>
> How do I do put the worksheet in webpage format and page down thru it?
>
> Thanks
> Joe
>



 
Reply With Quote
 
=?Utf-8?B?R3JycnJydW1weQ==?=
Guest
Posts: n/a
 
      3rd Apr 2007
No code can be seen/ modified, it was pass protected. I think I'm being
confusing. I want to display 28 or so rows of screen1 of a spreadsheet,
pause, page down, display the next 28 rows, pause, page down.. etc. I want
code or a macro to do this. When I reached the bottom, say 25 pages, I want
to go to the top and start over. If you do a print preview or a web page
preview of a spreadsheet, you will get an idea of what I want to see on the
screen. I dont want to see the row or column markings on the screen.

"NickHK" wrote:

> Can't you just edit the code you have from before, change the 4 to 18.
>
> NickHK
>
> "Grrrrrumpy" <(E-Mail Removed)> wrote in message
> news:3C18552E-0AA6-4FC1-9338-(E-Mail Removed)...
> > In an Excel 2003 spreadsheet, I have my layouts in sheet1, my data is

> input
> > for these layouts are inputted from sheet2.
> > The layouts consist of 28-30 rows (this can be changed to fit on a

> screen).
> > I want to display on the screen the 30 rows of sheet1.
> > A laptop will be connected to a big screen TV so it can be viewed in a

> large
> > room.
> > I want to pause a few seconds, page down and display the next 28 or 30
> > rows, pause, page down...etc.
> > When I reach the bottom, I want to go to the top and start the display
> > again. The display should be in "web page format" or "print preview

> format".
> > To stop the process, the user press the ESC key.
> >
> > This has done before. It displays groups of 4 teams in a round robin

> format
> > that
> > is updated during the event. The previous code was limited to 72 teams -

> 18
> > screens. It needs to be expanded. The macros were pass protected and are
> > unaccessible.
> >
> > How do I do put the worksheet in webpage format and page down thru it?
> >
> > Thanks
> > Joe
> >

>
>
>

 
Reply With Quote
 
NickHK
Guest
Posts: n/a
 
      3rd Apr 2007
It would probably be better to use Application.OnTime rather than .Wait, as
you may run out of stack space if this is running a long time. Also, you
cannot interact with Excel whilst it is running.
CTRL+ALT+BREAK stops the code running and resets to the initial range.

Const SECONDS_DELAY As String = "05"
Const ROWS_JUMP As Long = 25
Const COLUMNS_JUMP As Long = 0

Private Sub CommandButton1_Click()
Call MyGoTo(Range("A1"))
End Sub

Public Function MyGoTo(StartRange As Range) As Long

StartRange.Select

With Application
On Error GoTo Handler
.EnableCancelKey = xlErrorHandler

Do While ActiveCell.Row < UsedRange.Rows.Count
.Wait Now + TimeValue("0:00:" & SECONDS_DELAY)
.Goto ActiveCell.Offset(ROWS_JUMP, COLUMNS_JUMP), True
Loop

End With

Call MyGoTo(Range("A1"))

Exit Function
Handler:
'Code interupted, so reset
StartRange.Select

End Function

NickHK

"Grrrrrumpy" <(E-Mail Removed)> wrote in message
news:B5B1641D-0ACF-4B7C-9F8E-(E-Mail Removed)...
> No code can be seen/ modified, it was pass protected. I think I'm being
> confusing. I want to display 28 or so rows of screen1 of a spreadsheet,
> pause, page down, display the next 28 rows, pause, page down.. etc. I want
> code or a macro to do this. When I reached the bottom, say 25 pages, I

want
> to go to the top and start over. If you do a print preview or a web page
> preview of a spreadsheet, you will get an idea of what I want to see on

the
> screen. I dont want to see the row or column markings on the screen.
>
> "NickHK" wrote:
>
> > Can't you just edit the code you have from before, change the 4 to 18.
> >
> > NickHK
> >
> > "Grrrrrumpy" <(E-Mail Removed)> wrote in message
> > news:3C18552E-0AA6-4FC1-9338-(E-Mail Removed)...
> > > In an Excel 2003 spreadsheet, I have my layouts in sheet1, my data is

> > input
> > > for these layouts are inputted from sheet2.
> > > The layouts consist of 28-30 rows (this can be changed to fit on a

> > screen).
> > > I want to display on the screen the 30 rows of sheet1.
> > > A laptop will be connected to a big screen TV so it can be viewed in a

> > large
> > > room.
> > > I want to pause a few seconds, page down and display the next 28 or

30
> > > rows, pause, page down...etc.
> > > When I reach the bottom, I want to go to the top and start the display
> > > again. The display should be in "web page format" or "print preview

> > format".
> > > To stop the process, the user press the ESC key.
> > >
> > > This has done before. It displays groups of 4 teams in a round robin

> > format
> > > that
> > > is updated during the event. The previous code was limited to 72

teams -
> > 18
> > > screens. It needs to be expanded. The macros were pass protected and

are
> > > unaccessible.
> > >
> > > How do I do put the worksheet in webpage format and page down thru it?
> > >
> > > Thanks
> > > Joe
> > >

> >
> >
> >



 
Reply With Quote
 
NickHK
Guest
Posts: n/a
 
      3rd Apr 2007
This version is a bit more stable. As you cannot pass parameters in a call
to .OnTime, use public variables to pass settings:
SHIFT+ESC to halt execution.

'<Standard Module code>
Public StartRange As Range
Public NextRange As Range

Public Const HOURS_DELAY As Long = 0
Public Const MINUTES_DELAY As Long = 0
Public Const SECONDS_DELAY As Long = 2

Public Const ROWS_JUMP As Long = 25
Public Const COLUMNS_JUMP As Long = 0

Public mStopLoop As Boolean

Public Sub MyGoToLoop()

With Application
.Goto NextRange, True

If ActiveCell.Row + ROWS_JUMP < ActiveSheet.UsedRange.Rows.Count Then
Set NextRange = ActiveCell.Offset(ROWS_JUMP, COLUMNS_JUMP)
Else
Set NextRange = StartRange
End If

If mStopLoop = False Then
.OnTime Now + TimeSerial(HOURS_DELAY, MINUTES_DELAY, SECONDS_DELAY),
"MyGoToLoop"
Else
.Goto StartRange, True
.OnKey "+{ESC}", ""
End If
End With

End Sub

Public Function StopLoop()
mStopLoop = True
End Function
'</Standard Module code>

'<WS Copde>
Private Sub CommandButton1_Click()

Set StartRange = Range("A1")
Set NextRange = Range("A1").Offset(ROWS_JUMP, COLUMNS_JUMP)
mStopLoop = False

With Application
.Wait Now + TimeSerial(HOURS_DELAY, MINUTES_DELAY, SECONDS_DELAY)
.OnKey "+{ESC}", "StopLoop"
End With

Call MyGoToLoop

End Sub
'</WS Copde>

NickHK

"Grrrrrumpy" <(E-Mail Removed)> wrote in message
news:B5B1641D-0ACF-4B7C-9F8E-(E-Mail Removed)...
> No code can be seen/ modified, it was pass protected. I think I'm being
> confusing. I want to display 28 or so rows of screen1 of a spreadsheet,
> pause, page down, display the next 28 rows, pause, page down.. etc. I want
> code or a macro to do this. When I reached the bottom, say 25 pages, I

want
> to go to the top and start over. If you do a print preview or a web page
> preview of a spreadsheet, you will get an idea of what I want to see on

the
> screen. I dont want to see the row or column markings on the screen.
>
> "NickHK" wrote:
>
> > Can't you just edit the code you have from before, change the 4 to 18.
> >
> > NickHK
> >
> > "Grrrrrumpy" <(E-Mail Removed)> wrote in message
> > news:3C18552E-0AA6-4FC1-9338-(E-Mail Removed)...
> > > In an Excel 2003 spreadsheet, I have my layouts in sheet1, my data is

> > input
> > > for these layouts are inputted from sheet2.
> > > The layouts consist of 28-30 rows (this can be changed to fit on a

> > screen).
> > > I want to display on the screen the 30 rows of sheet1.
> > > A laptop will be connected to a big screen TV so it can be viewed in a

> > large
> > > room.
> > > I want to pause a few seconds, page down and display the next 28 or

30
> > > rows, pause, page down...etc.
> > > When I reach the bottom, I want to go to the top and start the display
> > > again. The display should be in "web page format" or "print preview

> > format".
> > > To stop the process, the user press the ESC key.
> > >
> > > This has done before. It displays groups of 4 teams in a round robin

> > format
> > > that
> > > is updated during the event. The previous code was limited to 72

teams -
> > 18
> > > screens. It needs to be expanded. The macros were pass protected and

are
> > > unaccessible.
> > >
> > > How do I do put the worksheet in webpage format and page down thru it?
> > >
> > > Thanks
> > > Joe
> > >

> >
> >
> >



 
Reply With Quote
 
NickHK
Guest
Posts: n/a
 
      3rd Apr 2007
And depending what you want, it may be better to set the number of rows to
jump to a variable of the value

ActiveWindow.VisibleRange.Rows.Count

NickHK

"Grrrrrumpy" <(E-Mail Removed)> wrote in message
news:B5B1641D-0ACF-4B7C-9F8E-(E-Mail Removed)...
> No code can be seen/ modified, it was pass protected. I think I'm being
> confusing. I want to display 28 or so rows of screen1 of a spreadsheet,
> pause, page down, display the next 28 rows, pause, page down.. etc. I want
> code or a macro to do this. When I reached the bottom, say 25 pages, I

want
> to go to the top and start over. If you do a print preview or a web page
> preview of a spreadsheet, you will get an idea of what I want to see on

the
> screen. I dont want to see the row or column markings on the screen.
>
> "NickHK" wrote:
>
> > Can't you just edit the code you have from before, change the 4 to 18.
> >
> > NickHK
> >
> > "Grrrrrumpy" <(E-Mail Removed)> wrote in message
> > news:3C18552E-0AA6-4FC1-9338-(E-Mail Removed)...
> > > In an Excel 2003 spreadsheet, I have my layouts in sheet1, my data is

> > input
> > > for these layouts are inputted from sheet2.
> > > The layouts consist of 28-30 rows (this can be changed to fit on a

> > screen).
> > > I want to display on the screen the 30 rows of sheet1.
> > > A laptop will be connected to a big screen TV so it can be viewed in a

> > large
> > > room.
> > > I want to pause a few seconds, page down and display the next 28 or

30
> > > rows, pause, page down...etc.
> > > When I reach the bottom, I want to go to the top and start the display
> > > again. The display should be in "web page format" or "print preview

> > format".
> > > To stop the process, the user press the ESC key.
> > >
> > > This has done before. It displays groups of 4 teams in a round robin

> > format
> > > that
> > > is updated during the event. The previous code was limited to 72

teams -
> > 18
> > > screens. It needs to be expanded. The macros were pass protected and

are
> > > unaccessible.
> > >
> > > How do I do put the worksheet in webpage format and page down thru it?
> > >
> > > Thanks
> > > Joe
> > >

> >
> >
> >



 
Reply With Quote
 
=?Utf-8?B?R3JycnJydW1weQ==?=
Guest
Posts: n/a
 
      3rd Apr 2007
Thank you very much NickHK. I think this will resolve the paging portion.

Now for how the screen display looks. Each page or section of 28 rows
contains graphics, lines, data, etc to be displayed. Our goal is to display
this w/out having it look like a spreadsheet. In other words, have it look
like it does when you do a "Print Preview" or a "Web Page Preview" so you do
not have the rows or columns showing on the screen.







"NickHK" wrote:

> And depending what you want, it may be better to set the number of rows to
> jump to a variable of the value
>
> ActiveWindow.VisibleRange.Rows.Count
>
> NickHK
>
> "Grrrrrumpy" <(E-Mail Removed)> wrote in message
> news:B5B1641D-0ACF-4B7C-9F8E-(E-Mail Removed)...
> > No code can be seen/ modified, it was pass protected. I think I'm being
> > confusing. I want to display 28 or so rows of screen1 of a spreadsheet,
> > pause, page down, display the next 28 rows, pause, page down.. etc. I want
> > code or a macro to do this. When I reached the bottom, say 25 pages, I

> want
> > to go to the top and start over. If you do a print preview or a web page
> > preview of a spreadsheet, you will get an idea of what I want to see on

> the
> > screen. I dont want to see the row or column markings on the screen.
> >
> > "NickHK" wrote:
> >
> > > Can't you just edit the code you have from before, change the 4 to 18.
> > >
> > > NickHK
> > >
> > > "Grrrrrumpy" <(E-Mail Removed)> wrote in message
> > > news:3C18552E-0AA6-4FC1-9338-(E-Mail Removed)...
> > > > In an Excel 2003 spreadsheet, I have my layouts in sheet1, my data is
> > > input
> > > > for these layouts are inputted from sheet2.
> > > > The layouts consist of 28-30 rows (this can be changed to fit on a
> > > screen).
> > > > I want to display on the screen the 30 rows of sheet1.
> > > > A laptop will be connected to a big screen TV so it can be viewed in a
> > > large
> > > > room.
> > > > I want to pause a few seconds, page down and display the next 28 or

> 30
> > > > rows, pause, page down...etc.
> > > > When I reach the bottom, I want to go to the top and start the display
> > > > again. The display should be in "web page format" or "print preview
> > > format".
> > > > To stop the process, the user press the ESC key.
> > > >
> > > > This has done before. It displays groups of 4 teams in a round robin
> > > format
> > > > that
> > > > is updated during the event. The previous code was limited to 72

> teams -
> > > 18
> > > > screens. It needs to be expanded. The macros were pass protected and

> are
> > > > unaccessible.
> > > >
> > > > How do I do put the worksheet in webpage format and page down thru it?
> > > >
> > > > Thanks
> > > > Joe
> > > >
> > >
> > >
> > >

>
>
>

 
Reply With Quote
 
NickHK
Guest
Posts: n/a
 
      4th Apr 2007
Record a macro whilst you make these changes.
I would guess most are under Tools>Options>View

NickHK

"Grrrrrumpy" <(E-Mail Removed)> wrote in message
news:B2DF70A3-4439-4BFA-A917-(E-Mail Removed)...
> Thank you very much NickHK. I think this will resolve the paging portion.
>
> Now for how the screen display looks. Each page or section of 28 rows
> contains graphics, lines, data, etc to be displayed. Our goal is to

display
> this w/out having it look like a spreadsheet. In other words, have it look
> like it does when you do a "Print Preview" or a "Web Page Preview" so you

do
> not have the rows or columns showing on the screen.
>
>
>
>
>
>
>
> "NickHK" wrote:
>
> > And depending what you want, it may be better to set the number of rows

to
> > jump to a variable of the value
> >
> > ActiveWindow.VisibleRange.Rows.Count
> >
> > NickHK
> >
> > "Grrrrrumpy" <(E-Mail Removed)> wrote in message
> > news:B5B1641D-0ACF-4B7C-9F8E-(E-Mail Removed)...
> > > No code can be seen/ modified, it was pass protected. I think I'm

being
> > > confusing. I want to display 28 or so rows of screen1 of a

spreadsheet,
> > > pause, page down, display the next 28 rows, pause, page down.. etc. I

want
> > > code or a macro to do this. When I reached the bottom, say 25 pages, I

> > want
> > > to go to the top and start over. If you do a print preview or a web

page
> > > preview of a spreadsheet, you will get an idea of what I want to see

on
> > the
> > > screen. I dont want to see the row or column markings on the screen.
> > >
> > > "NickHK" wrote:
> > >
> > > > Can't you just edit the code you have from before, change the 4 to

18.
> > > >
> > > > NickHK
> > > >
> > > > "Grrrrrumpy" <(E-Mail Removed)> wrote in message
> > > > news:3C18552E-0AA6-4FC1-9338-(E-Mail Removed)...
> > > > > In an Excel 2003 spreadsheet, I have my layouts in sheet1, my data

is
> > > > input
> > > > > for these layouts are inputted from sheet2.
> > > > > The layouts consist of 28-30 rows (this can be changed to fit on a
> > > > screen).
> > > > > I want to display on the screen the 30 rows of sheet1.
> > > > > A laptop will be connected to a big screen TV so it can be viewed

in a
> > > > large
> > > > > room.
> > > > > I want to pause a few seconds, page down and display the next 28

or
> > 30
> > > > > rows, pause, page down...etc.
> > > > > When I reach the bottom, I want to go to the top and start the

display
> > > > > again. The display should be in "web page format" or "print

preview
> > > > format".
> > > > > To stop the process, the user press the ESC key.
> > > > >
> > > > > This has done before. It displays groups of 4 teams in a round

robin
> > > > format
> > > > > that
> > > > > is updated during the event. The previous code was limited to 72

> > teams -
> > > > 18
> > > > > screens. It needs to be expanded. The macros were pass protected

and
> > are
> > > > > unaccessible.
> > > > >
> > > > > How do I do put the worksheet in webpage format and page down thru

it?
> > > > >
> > > > > Thanks
> > > > > Joe
> > > > >
> > > >
> > > >
> > > >

> >
> >
> >



 
Reply With Quote
 
=?Utf-8?B?R3JycnJydW1weQ==?=
Guest
Posts: n/a
 
      5th Apr 2007
NickHK, thank you very much. This is what I'm looking for, this will work.

"NickHK" wrote:

> Record a macro whilst you make these changes.
> I would guess most are under Tools>Options>View
>
> NickHK
>
> "Grrrrrumpy" <(E-Mail Removed)> wrote in message
> news:B2DF70A3-4439-4BFA-A917-(E-Mail Removed)...
> > Thank you very much NickHK. I think this will resolve the paging portion.
> >
> > Now for how the screen display looks. Each page or section of 28 rows
> > contains graphics, lines, data, etc to be displayed. Our goal is to

> display
> > this w/out having it look like a spreadsheet. In other words, have it look
> > like it does when you do a "Print Preview" or a "Web Page Preview" so you

> do
> > not have the rows or columns showing on the screen.
> >
> >
> >
> >
> >
> >
> >
> > "NickHK" wrote:
> >
> > > And depending what you want, it may be better to set the number of rows

> to
> > > jump to a variable of the value
> > >
> > > ActiveWindow.VisibleRange.Rows.Count
> > >
> > > NickHK
> > >
> > > "Grrrrrumpy" <(E-Mail Removed)> wrote in message
> > > news:B5B1641D-0ACF-4B7C-9F8E-(E-Mail Removed)...
> > > > No code can be seen/ modified, it was pass protected. I think I'm

> being
> > > > confusing. I want to display 28 or so rows of screen1 of a

> spreadsheet,
> > > > pause, page down, display the next 28 rows, pause, page down.. etc. I

> want
> > > > code or a macro to do this. When I reached the bottom, say 25 pages, I
> > > want
> > > > to go to the top and start over. If you do a print preview or a web

> page
> > > > preview of a spreadsheet, you will get an idea of what I want to see

> on
> > > the
> > > > screen. I dont want to see the row or column markings on the screen.
> > > >
> > > > "NickHK" wrote:
> > > >
> > > > > Can't you just edit the code you have from before, change the 4 to

> 18.
> > > > >
> > > > > NickHK
> > > > >
> > > > > "Grrrrrumpy" <(E-Mail Removed)> wrote in message
> > > > > news:3C18552E-0AA6-4FC1-9338-(E-Mail Removed)...
> > > > > > In an Excel 2003 spreadsheet, I have my layouts in sheet1, my data

> is
> > > > > input
> > > > > > for these layouts are inputted from sheet2.
> > > > > > The layouts consist of 28-30 rows (this can be changed to fit on a
> > > > > screen).
> > > > > > I want to display on the screen the 30 rows of sheet1.
> > > > > > A laptop will be connected to a big screen TV so it can be viewed

> in a
> > > > > large
> > > > > > room.
> > > > > > I want to pause a few seconds, page down and display the next 28

> or
> > > 30
> > > > > > rows, pause, page down...etc.
> > > > > > When I reach the bottom, I want to go to the top and start the

> display
> > > > > > again. The display should be in "web page format" or "print

> preview
> > > > > format".
> > > > > > To stop the process, the user press the ESC key.
> > > > > >
> > > > > > This has done before. It displays groups of 4 teams in a round

> robin
> > > > > format
> > > > > > that
> > > > > > is updated during the event. The previous code was limited to 72
> > > teams -
> > > > > 18
> > > > > > screens. It needs to be expanded. The macros were pass protected

> and
> > > are
> > > > > > unaccessible.
> > > > > >
> > > > > > How do I do put the worksheet in webpage format and page down thru

> it?
> > > > > >
> > > > > > Thanks
> > > > > > Joe
> > > > > >
> > > > >
> > > > >
> > > > >
> > >
> > >
> > >

>
>
>

 
Reply With Quote
 
=?Utf-8?B?R3JycnJydW1weQ==?=
Guest
Posts: n/a
 
      6th Apr 2007
Hey NickHK,

I was able to get the first version to work and it looks great, but
like you said, it is a little unstable, difficult to terminate if let to run
for a little while. And in real use, the paging part will be left to run for
extended periods of time.
I was not able to get this later version to run, primarily because it
will not "compile".
You mentioned something about putting the Public constants, etc in a
module. I dont know how to do that, I'm not familiar with the Excel
environment. I set up command buttons for the macros I recorded and they
work. I'm trying to activate this paging code also w/ a Command button, but
when I tried to put this paging code in with the rest of my Command button
code, it blows up. I tried putting the Public constants & variables at the
top, but it still blows up. Where do I put it?
Sorry I'm so clueless.
Joe


"NickHK" wrote:

> This version is a bit more stable. As you cannot pass parameters in a call
> to .OnTime, use public variables to pass settings:
> SHIFT+ESC to halt execution.
>
> '<Standard Module code>
> Public StartRange As Range
> Public NextRange As Range
>
> Public Const HOURS_DELAY As Long = 0
> Public Const MINUTES_DELAY As Long = 0
> Public Const SECONDS_DELAY As Long = 2
>
> Public Const ROWS_JUMP As Long = 25
> Public Const COLUMNS_JUMP As Long = 0
>
> Public mStopLoop As Boolean
>
> Public Sub MyGoToLoop()
>
> With Application
> .Goto NextRange, True
>
> If ActiveCell.Row + ROWS_JUMP < ActiveSheet.UsedRange.Rows.Count Then
> Set NextRange = ActiveCell.Offset(ROWS_JUMP, COLUMNS_JUMP)
> Else
> Set NextRange = StartRange
> End If
>
> If mStopLoop = False Then
> .OnTime Now + TimeSerial(HOURS_DELAY, MINUTES_DELAY, SECONDS_DELAY),
> "MyGoToLoop"
> Else
> .Goto StartRange, True
> .OnKey "+{ESC}", ""
> End If
> End With
>
> End Sub
>
> Public Function StopLoop()
> mStopLoop = True
> End Function
> '</Standard Module code>
>
> '<WS Copde>
> Private Sub CommandButton1_Click()
>
> Set StartRange = Range("A1")
> Set NextRange = Range("A1").Offset(ROWS_JUMP, COLUMNS_JUMP)
> mStopLoop = False
>
> With Application
> .Wait Now + TimeSerial(HOURS_DELAY, MINUTES_DELAY, SECONDS_DELAY)
> .OnKey "+{ESC}", "StopLoop"
> End With
>
> Call MyGoToLoop
>
> End Sub
> '</WS Copde>
>
> NickHK
>
> "Grrrrrumpy" <(E-Mail Removed)> wrote in message
> news:B5B1641D-0ACF-4B7C-9F8E-(E-Mail Removed)...
> > No code can be seen/ modified, it was pass protected. I think I'm being
> > confusing. I want to display 28 or so rows of screen1 of a spreadsheet,
> > pause, page down, display the next 28 rows, pause, page down.. etc. I want
> > code or a macro to do this. When I reached the bottom, say 25 pages, I

> want
> > to go to the top and start over. If you do a print preview or a web page
> > preview of a spreadsheet, you will get an idea of what I want to see on

> the
> > screen. I dont want to see the row or column markings on the screen.
> >
> > "NickHK" wrote:
> >
> > > Can't you just edit the code you have from before, change the 4 to 18.
> > >
> > > NickHK
> > >
> > > "Grrrrrumpy" <(E-Mail Removed)> wrote in message
> > > news:3C18552E-0AA6-4FC1-9338-(E-Mail Removed)...
> > > > In an Excel 2003 spreadsheet, I have my layouts in sheet1, my data is
> > > input
> > > > for these layouts are inputted from sheet2.
> > > > The layouts consist of 28-30 rows (this can be changed to fit on a
> > > screen).
> > > > I want to display on the screen the 30 rows of sheet1.
> > > > A laptop will be connected to a big screen TV so it can be viewed in a
> > > large
> > > > room.
> > > > I want to pause a few seconds, page down and display the next 28 or

> 30
> > > > rows, pause, page down...etc.
> > > > When I reach the bottom, I want to go to the top and start the display
> > > > again. The display should be in "web page format" or "print preview
> > > format".
> > > > To stop the process, the user press the ESC key.
> > > >
> > > > This has done before. It displays groups of 4 teams in a round robin
> > > format
> > > > that
> > > > is updated during the event. The previous code was limited to 72

> teams -
> > > 18
> > > > screens. It needs to be expanded. The macros were pass protected and

> are
> > > > unaccessible.
> > > >
> > > > How do I do put the worksheet in webpage format and page down thru it?
> > > >
> > > > Thanks
> > > > Joe
> > > >
> > >
> > >
> > >

>
>
>

 
Reply With Quote
 
 
 
Reply

Thread Tools
Rate This Thread
Rate This Thread:

Posting Rules
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

BB code is On
Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are Off


Similar Threads
Thread Thread Starter Forum Replies Last Post
gridview paging selected page .. how to tell what page you are on? jobs Microsoft ASP .NET 1 6th Dec 2006 04:47 AM
remove automatic format display on page =?Utf-8?B?Q2hpcCBNb2NoZWw=?= Microsoft Word Document Management 3 21st Jul 2005 05:07 AM
Datagrid paging. It's not changing from page to page. Shapper Microsoft ASP .NET 2 22nd Jun 2005 03:15 AM
Date format display in ASP page for NT 4.0 v/s Win2K =?Utf-8?B?SW10aWF6?= Microsoft Windows 2000 0 15th Dec 2004 06:39 PM
how to display rtf format file in web page MACK Microsoft ASP .NET 2 11th Aug 2004 12:49 PM


Features
 

Advertising
 

Newsgroups
 


All times are GMT +1. The time now is 02:16 AM.