vbsでexcelファイルを開いた時とダブル

質問

お世話になっています。

vbsでexcelファイルを開いた時と、ダブルクリックでexcelファイルを開いた時とで表示するフォームを変えたいのです。

どうしてもうまくいきませんので、教えてください。

「起動.xlsm」というexcelファイルに「検索画面」「登録画面」という2つのユーザーフォームがあります。
excelの立ち上げ方法によってこの2つのフォームをどちらを起動時に立ち上げるかを決定したいのです。

1.　vbsファイルの上に任意のファイルをドラッグさせた時には
’vbsには
oApp.RUN "SHOW_Form_登録画面"

’excelには
Sub SHOW_Form_登録画面()

登録画面.Show
End Sub

として登録画面を表示させています。

2.　「起動.xlsm」をダブルクリックした時には
Private Sub Workbook_Open()
検索画面.Show
End Sub

として検索画面を表示しています。
どちらも単体では動きますが、両方を書き込むと
どちらの方法をとっても検索画面が前面に立ち上がってしまいます。

どうしたら希望のことができるでしょうか？

いったん表示させた「検索画面を閉じる」ということでもかまいません。

すいませんが、教えていただけると助かります。

回答No.1

NotFound404 · ベストアンサー

オートメーションで開かれた場合と、
手動（ダブルクリック）や、Shell メソッドの場合で分岐してみたら？
http://okwave.jp/qa/q8286456.html
↑敬愛する方の回答です。

お礼

できました、できました～。
めちゃめちゃ助かります。
ありがとうございました。