Excel VBAで、InputBoxを常にアクティブにする方法を教えてください。 削除
| Message#1 2014年12月29日(月)15時06分 From: ちーこちゃん |
| Excel VBAで、InputBoxを常にアクティブにする方法を教えてください。 プログラム経験がなくネットで検索しながらVBAのプログラムを作っているのですが 行き詰まってしまったので、どうかお知恵を貸していただけないでしょうか。m(_ _)m Excel上でマクロを実行すると、ブラウザが立ち上がり所定URLのページが開く その内容を見てインプットBOXに結果を入力する、というものを作りたいのですが CreateObjectで立ち上げたブラウザ（いつも使うブラウザであるChromeが立ち上がります）がアクティブになり、インプットBOXが後ろに隠れてしまいます。インプットBOXが最前面になり、すぐに入力できるようにするにはどうすれば良いのでしょうか？ ■環境 Windows8、Excel2013 ■作成中のソースコード Sub CK() R = ActiveCell.Row s = Cells(R, 2).Value CreateObject("wscript.shell").Run "http://so-bank.jp/detail/?code=" + s Dim strData As String strData = Application.InputBox( _ "ここが引数promptです。" & vbLf & "（必須入力）", _ "ここが引数titleです。", _ "ここが引数defaultです。") End Sub 補足 マクロ実行前にアクティブだったセルが、 実行後もアクティブになる方法も合わせてご教授いただけると幸いです （その場合は、InputBoxはアクティブになっている必要はございません） |
上のメッセージを削除します。
よければパスワードを入力し、削除ボタンをクリックしてください。
