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

質問

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

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

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

回答No.2

end-u · ベストアンサー

>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で操作ができるのですね！
とても参考になりました。
ありがとうございます。

回答No.1

mitarashi

Inputboxの事例ですが、他のブックをActivateしてから、Inputboxを実行すると可能です。そのブックのシート間移動は、Inputbox表示状態でも可能でした。リンク先のNo.4をご覧下さい。
http://okwave.jp/qa4956742.html

お礼

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