Sub OpenNotepad()
Dim RetVal As Variant
RetVal = Shell("C:\Windows\Notepad.exe", 4)
MsgBox "Notepad is open."
End Sub

--
HTH
Jason
Atlanta, GA

-----Original Message-----
I'd like to create a macro to launch notepad while in
Excel. The macro
should then return to the opened spreadsheet in Excel.
.