プロが教えるわが家の防犯対策術!

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

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

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

A 回答 (3件)

『[XL2000]ブック間のリンクを変更する方法および解除する方法』


http://support.microsoft.com/kb/402643/ja

この辺 参考にしてください。
    • good
    • 0
この回答へのお礼

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

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

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

お礼日時:2009/06/02 11:35

>【ファイルが見つかりません】という処理...


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

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

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

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

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

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

お礼日時:2009/06/02 09:13

>---------------


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


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

Workbook_Open()を適当に変更したらいかがですか?
    • good
    • 0
この回答へのお礼

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

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

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

お礼日時:2009/06/02 09:11

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!