On Sun, 16 Dec 2007 15:44:49 -0500, StargateFan
wrote:

On Sun, 16 Dec 2007 14:29:33 -0500, "Sue Mosher [MVP-Outlook]"
wrote:

Use a MsgBox statement:

Private Sub Application_Startup()
If MsgBox("Do you want to expand?", vbYesNo + vbQuestion, "Expand all?") Then
ExpandAllFolders
End If
End Sub


WOW!! That is so kewl!! I just changed the text a bit to this:
"Private Sub Application_Startup()
If MsgBox("Do you want to run the macro to expand all the
folders... ?", vbYesNo + vbQuestion, "Expand all?") Then
ExpandAllFolders
End If
End Sub"

and then it ran the macro at triple speed! Pretty kewl.

Is there a "sleep" function in vb? I'd like to add a second or 2 or
sleep before the message box comes up. This box pops up a bit too
quickly after one presses okay to enable macros.

Thanks for this! D

[snip]

Oops, didn't check it out thoroughly. The macro still runs even when
we press NO!

(

How come? g

Thanks. D