;)Sub OpenFolderRequest()
YesNo = MsgBox("Would you like to open the folder to see" _
& vbCr & "which files are currently there?", vbYesNo + vbQuestion, "Open Folder?")
Select Case YesNo
Case vbYes
myval = Shell("C:\Documents and Settings\pedie\Desktop\Startup c:winnt", 1)
Case vbNo
End Select...