> ・メモ帳に対して、SendKeysステートメントでデータを送る。 こちらのほうが簡単かも、確実性では?ですが Dim RetVal RetVal = Shell("NOTEPAD.EXE", vbNormalFocus) AppActivate RetVal SendKeys "ABC"