From: JOSEPH WEBER on
can i have a Macro that opens each tab and displays it for a number of
seconds then opens the next tab and does the same thing until the last tab?
Can this be without specifying tab names?
From: Mike H on
Hi,

This will show each sheet for 5 seconds

Sub ShowSheets()
For x = 1 To Worksheets.Count
Sheets(x).Activate
Application.Wait (Now + TimeValue("0:00:5"))
Next
End Sub
--
Mike

When competing hypotheses are otherwise equal, adopt the hypothesis that
introduces the fewest assumptions while still sufficiently answering the
question.


"JOSEPH WEBER" wrote:

> can i have a Macro that opens each tab and displays it for a number of
> seconds then opens the next tab and does the same thing until the last tab?
> Can this be without specifying tab names?
From: JLGWhiz on
Sub dk()

For Each sh In ActiveWorkbook.Sheets
sh.Select
s = Timer + 2
Do While Timer < s
DoEvents
Loop
Sheets(1).Select
Next
End Sub




"JOSEPH WEBER" <JOSEPHWEBER(a)discussions.microsoft.com> wrote in message
news:D0A873B7-D065-45CE-9ADD-6DC4462035E8(a)microsoft.com...
> can i have a Macro that opens each tab and displays it for a number of
> seconds then opens the next tab and does the same thing until the last
> tab?
> Can this be without specifying tab names?