This example uses the Shell function to run an application specified by the user.
' Specifying 1 as the second argument opens the application in
' normal size and gives it the focus.
Dim RetVal
RetVal = Shell("C:\WINDOWS\CALC.EXE", 1) ' Run Calculator.
...
Dans ton exemple il faut just changer "C:\WINDOWS\NOTEPAD.EXE" ...