[[20170531104159]] 『他のPCから開くとエラー』(かじりむし) ページの最後に飛ぶ

[ 初めての方へ | 一覧(最新更新順) | 全文検索 | 過去ログ ]

 

『他のPCから開くとエラー』(かじりむし)

お世話になります。

色々自分で調べてみましたが良くわからなく、お力をお貸しいただきたくまいりました。

前任者が作成使用していたエクセルブックを他のPCから開いて使用しようとしたところ、以下のコードにエラーがでてしまいます。

 Private Sub UserForm_Initialize()←ここが黄色

  NyuuryokuForm.txtSuuryou.Value = 0
  txtcomboBox0.Value = Sheets("郵便物入力").Range("g1").Value
  NyuuryokuForm.TextBox1.Value = Date←ここの「Date」が反転

 End Sub

エラーの内容が「コンパイルエラー:プロジェクトまたはライブラリが見つかりません。」です。

ユーザーフォームの場所にたくさんコードが書かれていて、その内の1つのコードです。

前任者のPCからブックを開いてユーザーフォームを開くと問題なく使用出来るのですが、他のPCにコピーを作成、ショートッカットブックを作成、で開いても、ネットワーク上の共通フォルダーに置いてある本家ブックを他のPCから開きに行っても上記エラーが出ます。

これだけでは何でエラーが出るのかわからないのであれば、他にたくさん書いてあるコードも記載したいと思いますが、何か本当に色々とあちこちにたくさんコードが書いてあるので、どれを記載して良いのかわかりません(泣)
良ければ記載しなくてはいけないだろうコードもお教えいただければ大変助かります。

日付が取得出来ないエラーなのかな?とは思うのですが・・・。

どうぞよろしくお願いいたします。

< 使用 Excel:Excel2010、使用 OS:Windows7 >


 エラーの出るPCでVBエディタを開きツール-参照設定を開いた場合に参照不可になっている項目があればそれのチェックを外してみてくれ。
(ねむねむ) 2017/05/31(水) 11:55

丸かぶりのようですが、貼っちゃいます。

エラー箇所は、特に問題がないように見えますね。標準のDate関数を潰して、独自のDate変数等を宣言しているのか、またはフォームに標準ではないコントロールを貼っているのか…。

確認のため、まず、うまくいかないPC上で ALT+F11 を押下し、VBAの編集画面を開きます。
「ツール」−「参照設定」を表示し、チェックの付いている項目に、参照不可になっているものがないか見てください。

もし参照不可のものがあるならば、うまく動くPCでも同様に、参照設定を確認してみてください。
(???) 2017/05/31(水) 12:01


ねむねむ様、???様、ありがとうございます。

エラーの出るPCで参照不可になっている項目のチェックを外しましたところ正常に動きました♪

とても簡単な事でしたのに、お手数をかけてしまいました・・・。

自分で色々と検索をかけたりして調べたのですが、知識がないって恐ろしい事だと知りました(汗)

少しずつ勉強して、とりあえずは前任者が作成した内容を理解したいと思います。

本当にありがとうございました!!!!!
(かじりむし) 2017/05/31(水) 13:28


知識というか、そういう事態に遭遇した経験があるかどうかですかね。適切なキーワードが無く、検索しても見つかりにくい内容かと思いますよ。 そして、参照設定の問題だったとの事ですが、元のPCではそれが何だったか、書き出せますか?

参照設定していたということは、何らかの標準ではないコントロールを貼っていたという事なのですが、参照設定を止めてしまうと、その貼っているものはPictureBoxに変わってしまって、マクロが正しく動かなくなっているのではないかと思われます。

よくあるのが、古いMS-Accessに付属していたカレンダコントロールをExcelで使っている場合。新しいPCではMS-Accessをインストールしていないとか、新しいAccessしか使っていないとかだと、PCにコントロールがインストールされておらず、使えないのです。
この場合は、カレンダ画面を自作するとか、日付はTextBoxで手入力にするとか、大幅なコード変更が必要になる事でしょう。
(???) 2017/05/31(水) 13:47


コメント返信:

[ 一覧(最新更新順) ]


YukiWiki 1.6.7 Copyright (C) 2000,2001 by Hiroshi Yuki. Modified by kazu.