別窓でExcelアプリケーションを開きたい

質問

ブックではなく、別窓でExcelアプリケーションを開きたいです。
ＶＢＡで別窓でExcelアプリケーションを開きたいのですが、
どのようなコードを書けばいいのでしょうか？

やりたいこととしては、
スタートメニューからすべてのプログラム→Microsoft Office→Microsoft Office Excel 2003
を開くことと同じことをＶＢＡでやりたいです。

そしてタスクバーに
Microsoft Excelを二つ表示させたいです。
二つというのは、一つ目のExcelアプリケーションは、
もうひとつのアプリケーションを開くＶＢＡを実行し、
二つにしたいということです。

ご教授よろしくお願い致します。

回答No.1

xls88 · ベストアンサー

下記のようなことでどうでしょうか。

Dim xlApp As Object
Dim xlBook As Object

Set xlApp = CreateObject("Excel.Application")
Set xlBook = xlApp.Workbooks.Open(ThisWorkbook.path & "\" & "A.xlsx")
xlApp.Visible = True
xlBook.Worksheets(1).Select

Set xlApp = Nothing: Set xlBook = Nothing

お礼

ありがとうございました！