◆概要
このページは、AccessからExcelファイルを開く方法について記載しています。

◆DDEExecuteメソッド

開いているDDEチャンネルで、クライアントアプリケーションからサーバーアプリケーションにコマンドを送信するには、DDEExecuteメソッドを使用します。

AccessからExcelのファイルを開く、といった場合には、クライアントアプリケーションであるAccess側からDDEExecuteメソッドを使用して、サーバーアプリケーションであるExcelのファイルを開くコマンドを送信します。

◆使用例
Cドライブのルートにある、Excelファイル「test.xls」を開きます。

Function OpenExcelFile()
   Dim ch As Variant
   Dim sl As Variant

   ' Excelを実行する
   sl = Shell("C:\Program Files\Microsoft Office\Office\Excel.exe")
   ' ExcelとのDDE変換を開始する
   ch = DDEInitiate("Excel", "system")
   ' Excelファイルを開く
   DDEExecute ch, "[open(""c:\test.xls"")]"
   ' DDEチャンネルを閉じる
   DDETerminate (ch)
End Function