いつもお世話になっております。 さっそくですが、フォームにあるアクションボタンを押下すると リッチテキストに添付したExcelファイルからデータを読み出し、 新規文書を作成するという処理を行いたいのですが、Excelファイルを 開く時はパス指定で開きますよね。 pathname = "C:\TEST\" & o.Source Set excelAppli = CreateObject("Excel.Application") excelAppli.Visible = False Set excelBook = excelAppli.Workbooks.Open(pathname) Set excelSheet = excelBook.Worksheets(1) ・ ・ ・ 上記のように。 ただ、今回はディスクからではなく、文書から直接開きたいのです。 文書上のファイルとなるとパスって存在しないですよね。 となるとExcelが開けません。 ただ、文書上のファイルを右クリックorプロパティウィンドウで起動 させると自動的にOS指定のTempフォルダにExcelファイルが 作成されるようで、下記のように書くと取得できます。 pathname = Environ("Temp") & "\" & o.Source しかし、一度起動しなければならないという手間があります。 どうしたら添付ファイルを直接開けるでしょうか？ やっぱり一度ディスクに保存して、処理終了後にファイルを削除する というやり方しかありませんか？