VBAがステップインでデバックできない

GetOpenFilenameを使ってファイルパスを取得してから処理を進めるVBAを作っていました。
取得したパスをセルに代入→本処理という流れです。
先ほど、エラーがないかとステップインで実行してみたのですが、
当該ダイアログボックスは表示されるのですが、選択して開くとその後の処理が全て実行されてしまいます。
何かプログラムで悪い部分はあるのでしょうか?

プログラム全文

Sub fileselect()
タイトル = "ファイルを選択してください。"
FileToOpen = Application.GetOpenFilename("Excel ファイル (*.xls; *.xlsx; *.xlsm),*.xls; *.xlsx; *.xlsm", , タイトル)
Range("H6").Value = FileToOpen
End Sub

H6のセルにパスを代入する前野タイミングでMSGBOXを使ってみましたが、それも自動的に表示されたので、ステップインができない状況だと思います。
※プログラム記述の誤り、VBAの仕様等わかればご教示下さい。(Excel 2010を使っています。)

回答の条件
  • 1人5回まで
  • 13歳以上
  • 登録:2014/05/19 11:41:31
  • 終了:2014/05/26 11:45:04

回答(1件)

id:engle No.1

engle回答回数8ベストアンサー獲得回数12014/05/21 22:25:47

当方の環境(excel2007,2013)では再現せず。
プログラムに問題はありません。
(悪いかどうかは知らん)

以下、参考までに。
・getopenfilenameは組み込み関数なので
 それ以上詳細にステップインできない。

・getopenfilenameは
「ダイアログを表示してファイルを選択させる」
 までが1ステップなので、デバッグ中かに関わらず
 実行するとユーザがファイルを選択するまで処理を待機する。

・1ステップごとに処理を追う場合はステップイン後、F8キー連打です。
 (ステップイン後に「実行->継続(F5)」すると
  その後の処理は最後まで実行されます。)

コメントはまだありません

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

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

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

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