マクロを作成したファイルを立ち上げたときの処理

質問

こんにちは、いつも勉強させてもらっています。

さて、今回はマクロを作成したファイルを開くと、【ファイルが見つかりません】という処理になってしまうので質問させてもらいました。

プログラムの内容は次の通りです。
---------------
Private Sub Workbook_Open()
Worksheets("入力フォーム").Activate
修理報告書ナビ.Show vbModeless
End Sub
---------------
これしか書いていないのに、ファイルを見つけにいって上記のようにコメントされてしまいます。
閉じるにすれば特に問題はないのですが、閉じるにする処理も面倒なもので・・・。
理由もしくはそれをなくす方法がわかりません。
方法を教えてください。
よろしくお願いいたします。

回答No.3

end-u · ベストアンサー

『[XL2000]ブック間のリンクを変更する方法および解除する方法』
http://support.microsoft.com/kb/402643/ja

この辺 参考にしてください。

お礼

end-u様、ありがとうございます！！！
参考ＨＰの通りにやってみたら、無事解決しました！！！！！！

同僚が作成したシートをコピペしてきたのですが、そこのセルに数式が書いてありました（それも20個も！）

本当にありがとうございました。

回答No.2

end-u

>【ファイルが見つかりません】という処理...
というのはファイルオープンダイアログが開くという意味ですか？
その場合、
>Private Sub Workbook_Open()
>Worksheets("入力フォーム").Activate
>修理報告書ナビ.Show vbModeless
>End Sub
一度これを全てコメントアウトして開いてみてください。
それでも出るようでしたら、コードではなくて数式によるリンクファイルの問題です。

出ないようだったら、Workbook_Openイベントでは確かにそれしか書いてなくても
>修理報告書ナビ.Show vbModeless
これでUserForm『修理報告書ナビ』を開くように指示しているわけですから、
UserForm『修理報告書ナビ』を開く時のイベント、
UserForm_InitializeイベントやUserForm_Activateイベントに何か書いていませんか？

お礼

end-u様、ご回答ありがとうございます。

ご指摘の通り、コメントアウトしてみましたが、やっぱりだめでした・・・。

＞それでも出るようでしたら、コードではなくて数式によるリンクファイルの問題です

これは、どうしたら直るのでしょうか？
数式はいろいろと使っているので、どれをなくしたらよいのか・・・
やはり一つ一つあたるしかないのでしょうか？？

回答No.1

Sinogi

>---------------
>Private Sub Workbook_Open()
>Worksheets("入力フォーム").Activate
>修理報告書ナビ.Show vbModeless
>End Sub
>---------------
>これしか書いていないのに

このコードを記述したファイルを開くときに
Worksheets("入力フォーム")
が存在しないからでしょ？

Workbook_Open()を適当に変更したらいかがですか？

お礼

Sinogi様、ご回答ありがとうございます。

＞Worksheets("入力フォーム")が存在しないからでしょ？

これはあるんです。
ちなみに、Workbook_Open()をなくしてもだめでした・・・