ある名前のエクセルのブックが開いているかどうかは、関数一発で調べることはできないのでしょうか?

下記のように、ループをまわさないといけないのでしょうか?
http://officetanaka.net/excel/vba/file/file04.htm

回答の条件
  • URL必須
  • 1人2回まで
  • 13歳以上
  • 登録:2010/03/03 18:41:39
  • 終了:2010/03/03 19:42:09

回答(1件)

id:SALINGER No.1

SALINGER回答回数3454ベストアンサー獲得回数9692010/03/03 18:51:31

ポイント60pt

関数一発とはいきませんが、ループを回さずに調べる方法はあります。

    Dim wb As Workbook
    
    On Error Resume Next
    Set wb = Workbooks("aaa.xls")
    On Error GoTo 0
    
    If wb Is Nothing Then
        Debug.Print "開いていない"
    Else
        Debug.Print "開いている"
    End If

http://q.hatena.ne.jp/

Workbook型のオブジェクトに代入できるかどうかで判別する方法です。

コードの長さは変わりませんね。

id:kaiketsu

そうですね。ただ、こちらのほうが時間はかからないっぽいですね。

2010/03/03 19:41:56
  • id:GreenStar
    違う質問のほうから、ごめん!!

    http://q.hatena.ne.jp/1267613436 のほうに間違った回答をしてしまった!!!

    書き直したら投稿するので、私のは開かないで!!!!!
  • id:GreenStar
    http://q.hatena.ne.jp/1267613436
    新しく投稿しましたぁ!

    1回目のは配列にする方法で、2回目のが結合する方法です!!
    出力方法も変えてみました!!

    ちがう質問のことですみません > id:SALINGER さん

この質問への反応(ブックマークコメント)

「あの人に答えてほしい」「この質問はあの人が答えられそう」というときに、回答リクエストを送ってみてましょう。

これ以上回答リクエストを送信することはできません。制限について

絞り込み :
はてなココの「ともだち」を表示します。
回答リクエストを送信したユーザーはいません