RefEditやInputboxで他のブックの範囲を指定するには

RefEditやInputboxの入力の場面で、
他のブックの範囲を指定したいのですが
できませんでした。

エクセルのブックのIF関数とかで範囲を設定するときに出てくる
Inputboxの様なものみたいに、他のブックを直接指定できる
コードはありますか？

上手く表現できなくて申し訳ありませんが、
もし分かる方がいらっしゃいましたら教えてください。

No.2 ベストアンサー 回答者： end-u 回答日時： 2009/06/01 21:53

>RefEditやInputboxの入力の場面で、

>他のブックの範囲を指定したいのですが
>できませんでした。
例えば、Inputboxを表示した状態で手作業で他Bookに切り替えたいという意味ですよね？
できますよ。

Sub test()
　　Dim r As Range
　　
　　On Error Resume Next
　　Set r = Application.InputBox("他Bookの選択は ワークシートメニューバーの" _
　　　　　　　　　　　　　　　 & "[ウィンドウ(W)]で できます。", Type:=8)
　　On Error GoTo 0
　　If Not r Is Nothing Then
　　　　MsgBox r.Address(external:=True)
　　　　Set r = Nothing
　　End If
End Sub

この回答へのお礼

素早い回答ありがとうございます。
ウィンドウWで操作ができるのですね！
とても参考になりました。
ありがとうございます。

お礼日時：2009/06/01 22:26

No.1 回答者： mitarashi 回答日時： 2009/06/01 21:28

Inputboxの事例ですが、他のブックをActivateしてから、Inputboxを実行すると可能です。

そのブックのシート間移動は、Inputbox表示状態でも可能でした。リンク先のNo.4をご覧下さい。
http://okwave.jp/qa4956742.html

この回答へのお礼

素早い回答ありがとうございます。
ご丁寧に書いて下さって感謝しています。

お礼日時：2009/06/01 21:49