dポイントプレゼントキャンペーン実施中!

以下のVBAを実行したいのですが

Private Sub test()
Dim objWorkbook1 As Excel.Workbook
Dim objWorkbook2 As Excel.Workbook
Set objWorkbook1 = GetObject("C:\あいうえお\200706.xls")
Set objWorkbook2 = GetObject("C:\かきくけこ\200706.xls")←別の場所にある同じファイル
End Sub

「アプリケーション定義またはオブジェクト定義のエラーです。」と
表示されます、GetObjectを2回連続で呼ぶことは
出来ないのでしょうか?

よろしくお願いします。

A 回答 (2件)

>別の場所にある同じファイル



同名のファイルなので起動時にエラーになるのです。
エクセルの通常の使用でも同様です。
保存フォルダが違っていても同名ファイルの同時起動はできません。
    • good
    • 0

出来ないと思いますよ。



保存先が別のファイルでも、同じ名前のファイルを同時に開くことはできません。
2つめのファイルを開く場合は、一方のファイルを閉じるか、またはいずれかの
ファイルの名前を変更してください。

エラー内容の一部から
    • good
    • 0

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!