• 締切
  • 暇なときにでも

VBでのエクセルの起動

  • 質問No.91064
  • 閲覧数382
  • ありがとう数4
  • 回答数4

お礼率 33% (2/6)

ファイルリストボックスで選択した.xlsファイルを
コマンドボタンを使用してExcelを起動し
そのファイルを表示(使用)するには
どの様にすれば宜しいのでしょうか?
コーディングなど教えて頂けると大変助かります
宜しくお願い致します。

回答 (全4件)

  • 回答No.4

ベストアンサー率 49% (139/279)

millionwakerさんの回答に追加を

既にExcelが起動していれば、そのExcelで開くようにする

Dim objExl As Object
Err.Clear
On Error Resume Next
Set objExl = GetObject(, "Excel.Application")
If Err.Number <> 0 Then
Set objExl = CreateObject("Excel.Application")
End If
objExl.Workbooks.Open ファイル名
objExl.Visible = True
Set objExl = Nothing
  • 回答No.3

ベストアンサー率 77% (14/18)

ShellExecute APIを利用するのもいいかも。
  • 回答No.2

ベストアンサー率 28% (17/60)

選択された、ファイルをEXCELで開くという事でしたら、Shellを使用
すれば、可能かと思います。
ただし、この場合はVBで作成したアプリとは非動機でEXCELが起動
します。
<例>
 xl = shell("EXCELのパス bookのパス")
  • 回答No.1

ベストアンサー率 46% (22/47)

Excelを起動してファイルを開くところだけ。

Dim xl As Excel.Application
Set xl = CreateObject("Excel.Application")
xl.Visible = True
xl.Workbooks.Open(strFileName)

参照設定はちゃんとしておいてくださいね。
ファイルリストで選択するのもコマンドボタンが押されたときの処理も聞きたいということであればまたご質問ください。
関連するQ&A

その他の関連するQ&Aをキーワードで探す

ピックアップ

ページ先頭へ