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?

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?

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@discussions.microsoft.com> wrote in message 
news:D0A873B7-D065-45CE-9ADD-6DC4462035E8@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?