Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
5236 / 13646 ﾂﾘｰ ←次へ　｜　前へ→
▼ 【51953】ThisWorkbookに書いたプログラムが保存されない REVOLVER 07/10/12(金) 20:39 質問[未読]
【51954】Re:ThisWorkbookに書いたプログラムが保存... ぱっせんじゃー 07/10/12(金) 21:21 発言[未読]
【51955】Re:ThisWorkbookに書いたプログラムが保存... REVOLVER 07/10/12(金) 21:33 質問[未読]
【51960】Re:ThisWorkbookに書いたプログラムが保存... maka 07/10/12(金) 23:08 発言[未読]
【51963】Re:ThisWorkbookに書いたプログラムが保存... REVOLVER 07/10/13(土) 7:54 質問[未読]
【51970】Re:ThisWorkbookに書いたプログラムが保存... maka 07/10/13(土) 21:40 発言[未読]
【51978】Re:ThisWorkbookに書いたプログラムが保存... りん 07/10/14(日) 3:40 発言[未読]
【51982】Re:ThisWorkbookに書いたプログラムが保存... REVOLVER 07/10/14(日) 15:58 発言[未読]
【52003】Re:ThisWorkbookに書いたプログラムが保存... REVOLVER 07/10/15(月) 20:09 お礼[未読]
【51953】ThisWorkbookに書いたプログラムが保存さ...
質問  REVOLVER  - 07/10/12(金) 20:39 -
引用なし
パスワード
   初めて質問させてもらいます、よろしくお願いします。
初心者で入門書片手に頑張っていたのですが、
「ThisWorkbookとSheetに書いたプログラムが保存されない」
という状態で困っています…

保存しようとしているプログラムは、
初心者の練習のようなプログラムでこれです。
これに限らずなにも保存できません…

Private Sub Workbook_Open()
MsgBox ("自動で出ます")
End Sub

Moduleの方はプログラムを保存できるのですが、
ThisWorkbookとSheetのほうは保存しても、
一度ファイルを閉じて再度開くと消えています、
保存できていないのです。
入門書を見ても書いてないし、
ネットで検索したのですが、検索の仕方が悪いのかわかりませんでした。
どこかの設定がおかしいのでしょうか…

環境は　EXCEL2002　OS:XP Professional

教えてください。どうかよろしくお願いします。
【51954】Re:ThisWorkbookに書いたプログラムが保...
発言  ぱっせんじゃー  - 07/10/12(金) 21:21 -
引用なし
パスワード
   コードを記述後、ブック
を上書き保存していますか？
【51955】Re:ThisWorkbookに書いたプログラムが保...
質問  REVOLVER  - 07/10/12(金) 21:33 -
引用なし
パスワード
   返信ありがとうございます。
はい、上書き保存は確かにしています…
（VBEのとこの上書き保存、EXCELのほうの上書き保存）
Moduleに書くプログラムのほうは保存できるんです。
直感的に、どこかしらの設定、もしくは制限？みたいなものが
あるのではないかと、質問させて頂いたのですが…
なにかヒントになるようなことでも何でも結構なので、
アドバイス頂けたらと思います。よろしくお願いします。
【51960】Re:ThisWorkbookに書いたプログラムが保...
発言  maka  - 07/10/12(金) 23:08 -
引用なし
パスワード
   ▼REVOLVER さん：
>返信ありがとうございます。
>はい、上書き保存は確かにしています…
>（VBEのとこの上書き保存、EXCELのほうの上書き保存）
>Moduleに書くプログラムのほうは保存できるんです。
>直感的に、どこかしらの設定、もしくは制限？みたいなものが
>あるのではないかと、質問させて頂いたのですが…
>なにかヒントになるようなことでも何でも結構なので、
>アドバイス頂けたらと思います。よろしくお願いします。


例えば、新しくBookを開くと「Book1」ができますが名前を変更してそれを呼び出しているのか？

標準モジュールの、「Mosule」には記載できると言うことなのですが「ThisWorkbook」に記述するときに「ThisWorkbook」をダブルクリックして記述していないのか？
コードを記載しているところが、もしかしたら違うところに記載しているのか？

「ThisWorkbook」をダブルクリックして、「オブジェクトボックス」（General・と記載されているところ）をクリックすると「Workbook」と出てきていれば「ThisWorkbook」に記載されていることになります。

これでも、保存できないと私には力不足で分かりません。
【51963】Re:ThisWorkbookに書いたプログラムが保...
質問  REVOLVER  - 07/10/13(土) 7:54 -
引用なし
パスワード
   makaさん返信ありがとうございます。

>例えば、新しくBookを開くと「Book1」ができますが名前を変更してそれを呼び出しているのか？

　 ファイル名を特にいじったりはしていません。
　 新規作成したファイルで「Book1」のときも、
　 元々VBAを使っていない既存のEXCELファイルに記述したときも、同じです。

>標準モジュールの、「Mosule」には記載できると言うことなのですが「ThisWorkbook」に記述するときに「ThisWorkbook」をダブルクリックして記述していないのか？

　 「ThisWorkbook」の記述欄の出し方ですが、
　 「ThisWorkbook」をダブルクリックして出したり、右クリックで
　 「コードの表示」で出しています。
　
>コードを記載しているところが、もしかしたら違うところに記載しているのか？
>「ThisWorkbook」をダブルクリックして、「オブジェクトボックス」（General・と記載されているところ）をクリックすると「Workbook」と出てきていれば「ThisWorkbook」に記載されていることになります。

　 「オブジェクトボックス」から「Workbook」を選択すると、
　 自動的にこう書かれます。

　　　　　Private Sub Workbook_Open()

　　　　　End Sub

　 さらに右のボックスで「Open」以外を選択して試しましたが、同じでした。


この「ThisWorkbookとSheetに書いたプログラムが保存されない」
という状態は、会社のパソコン（複数あります）【環境：EXCEL2002 OS:XP Pro 】
でのことでして、自宅のパソコン【環境：EXCEL2003 OS:XP Pro 】
では、何のこともなく普通に保存できました。
（申し訳ありません。もっと早く試していれば…）
ですので、余計に原因が分からなくなってきました。


ひとつだけ気になるのが、
プロジェクトツリーが会社のパソコンと自宅のパソコンで違うのです。
これは関係ないですか？関係ないですよね…

　○EXCEL2003の自宅のPCのVBEの画面では

　　VBAProject（ファイル名）
　　　├ Microsoft Excel objects
　　　│　　　├ Sheet1(Sheet1)
　　　│　　　├ Sheet2(Sheet2)
　　　│　　　└ ThisWorkbook
　　　│
　　　└ 標準モジュール
　　　　　　　├ Module1
　　　　　　　└ Module2

　○EXCEL2002の会社のPCのVBEの画面では

　　VBAProject（ファイル名）
　　　├ Sheet1(Sheet1)
　　　├ Sheet2(Sheet2)
　　　├ ThisWorkbook
　　　├ Module1
　　　└ Module2

ぱっせんじゃーさんmakaさん、
こんな奇問に答えて頂いて本当にありがとうございます。
会社のパソコンでもう一度、
お二人に指摘して頂いた点に注意しながら、
やってみようと思います。

引き続き、アドバイスを募集したいと思います。
どうしても解決したいので、よろしくお願いします。
【51970】Re:ThisWorkbookに書いたプログラムが保...
発言  maka  - 07/10/13(土) 21:40 -
引用なし
パスワード
   ▼REVOLVER さん：
>makaさん返信ありがとうございます。
>
>>例えば、新しくBookを開くと「Book1」ができますが名前を変更してそれを呼び出しているのか？
>
>　 ファイル名を特にいじったりはしていません。
>　 新規作成したファイルで「Book1」のときも、
>　 元々VBAを使っていない既存のEXCELファイルに記述したときも、同じです。
>
>>標準モジュールの、「Mosule」には記載できると言うことなのですが「ThisWorkbook」に記述するときに「ThisWorkbook」をダブルクリックして記述していないのか？
>
>　 「ThisWorkbook」の記述欄の出し方ですが、
>　 「ThisWorkbook」をダブルクリックして出したり、右クリックで
>　 「コードの表示」で出しています。
>　
>>コードを記載しているところが、もしかしたら違うところに記載しているのか？
>>「ThisWorkbook」をダブルクリックして、「オブジェクトボックス」（General・と記載されているところ）をクリックすると「Workbook」と出てきていれば「ThisWorkbook」に記載されていることになります。
>
>　 「オブジェクトボックス」から「Workbook」を選択すると、
>　 自動的にこう書かれます。
>
>　　　　　Private Sub Workbook_Open()
>
>　　　　　End Sub
>
>　 さらに右のボックスで「Open」以外を選択して試しましたが、同じでした。
>
>
>この「ThisWorkbookとSheetに書いたプログラムが保存されない」
>という状態は、会社のパソコン（複数あります）【環境：EXCEL2002 OS:XP Pro 】
>でのことでして、自宅のパソコン【環境：EXCEL2003 OS:XP Pro 】
>では、何のこともなく普通に保存できました。
>（申し訳ありません。もっと早く試していれば…）
>ですので、余計に原因が分からなくなってきました。
>
>
>ひとつだけ気になるのが、
>プロジェクトツリーが会社のパソコンと自宅のパソコンで違うのです。
>これは関係ないですか？関係ないですよね…
>
>　○EXCEL2003の自宅のPCのVBEの画面では
>
>　　VBAProject（ファイル名）
>　　　├ Microsoft Excel objects
>　　　│　　　├ Sheet1(Sheet1)
>　　　│　　　├ Sheet2(Sheet2)
>　　　│　　　└ ThisWorkbook
>　　　│
>　　　└ 標準モジュール
>　　　　　　　├ Module1
>　　　　　　　└ Module2
>


私のパソコンは、XP　sp1　　Execl2002　sp3なのですが↑のようになりますよ！

↓のようにならないなぁ〜


>　○EXCEL2002の会社のPCのVBEの画面では
>
>　　VBAProject（ファイル名）
>　　　├ Sheet1(Sheet1)
>　　　├ Sheet2(Sheet2)
>　　　├ ThisWorkbook
>　　　├ Module1
>　　　└ Module2
>


もしかすると、マイクロソフトのHPで何か分かるかもしれません。はじめの4文字は、半角にしてください。
ｈｔｔｐ://support.microsoft.com/


どうも、お力になれないようですみません。


>ぱっせんじゃーさんmakaさん、
>こんな奇問に答えて頂いて本当にありがとうございます。
>会社のパソコンでもう一度、
>お二人に指摘して頂いた点に注意しながら、
>やってみようと思います。
>
>引き続き、アドバイスを募集したいと思います。
>どうしても解決したいので、よろしくお願いします。
【51978】Re:ThisWorkbookに書いたプログラムが保...
発言  りん E-MAIL  - 07/10/14(日) 3:40 -
引用なし
パスワード
   こんばんわ。

>>ひとつだけ気になるのが、
>>プロジェクトツリーが会社のパソコンと自宅のパソコンで違うのです。
>>これは関係ないですか？関係ないですよね…

これは、プロジェクトエクスプローラーの「フォルダのきりかえ」アイコンをクリックするときり変わるので、関係ないと思います。

>>　○EXCEL2003の自宅のPCのVBEの画面では
>>
>>　　VBAProject（ファイル名）
>>　　　├ Microsoft Excel objects
>>　　　│　　　├ Sheet1(Sheet1)
>>　　　│　　　├ Sheet2(Sheet2)
>>　　　│　　　└ ThisWorkbook
>>　　　│
>>　　　└ 標準モジュール
>>　　　　　　　├ Module1
>>　　　　　　　└ Module2
>>
>>　○EXCEL2002の会社のPCのVBEの画面では
>>
>>　　VBAProject（ファイル名）
>>　　　├ Sheet1(Sheet1)
>>　　　├ Sheet2(Sheet2)
>>　　　├ ThisWorkbook
>>　　　├ Module1
>>　　　└ Module2

・ThisWorkbookにイベントを乗せたブックを開けるかどうか
・そのマクロを編集して保存できるかどうか
せめてこれが試せたらいいんですけどね。
【51982】Re:ThisWorkbookに書いたプログラムが保...
発言  REVOLVER  - 07/10/14(日) 15:58 -
引用なし
パスワード
   makaさん再度返信頂きありがとうございます。

>もしかすると、マイクロソフトのHPで何か分かるかもしれません。

マイクロソフトのHPで検索という手もあるんですね。
勉強になります。こちらでも調べてみます。


りんさん返信ありがとうございます。

>これは、プロジェクトエクスプローラーの「フォルダのきりかえ」アイコンをクリックするときり変わるので、関係ないと思います。

仰るとおり通りでした。ありがとうございます。

>・ThisWorkbookにイベントを乗せたブックを開けるかどうか
>・そのマクロを編集して保存できるかどうか
>せめてこれが試せたらいいんですけどね。

次にやるべきはこれですね！
自宅のパソコンで保存したものを、
さっそく明日、出勤した際に試したいと思います。


みなさんにご迷惑おかけしている分、
なんとしてでも原因を突き止めて、
スッキリさせたいと思います！
【52003】Re:ThisWorkbookに書いたプログラムが保...
お礼  REVOLVER  - 07/10/15(月) 20:09 -
引用なし
パスワード
   おかげさまで原因がわかりました。

会社のパソコンはエクセルファイルを保存する際に、
デフォルトで「Microsoft Excel 5.0/95 ブック」の形式になっていました。

この「Excel 5.0/95 ブック」の形式だと、
イベントマクロ？というのでしょうか、
「ThisWorkbookとSheetに書いたプログラムが保存されない」状態になるようです。
「Excel 97-2002 および 5.0/95 ブック」「Office Excel ブック」
の形式で保存すれば大丈夫でした。

「Excel 97-2002 および 5.0/95 ブック」「Office Excel ブック」
の形式で保存されていたイベントマクロも、
「Excel 5.0/95 ブック」の形式で上書き保存してしまうと、
消えてしまうようです。

ということで、解決しました。

おそらくこういうことで合っていると思うのですが、
補足や間違っている点などありましたら、ご指摘いただけると助かります。

みなさんには大変お世話になりました。ありがとうございました！
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
5236 / 13646 ﾂﾘｰ ←次へ　｜　前へ→
ページ：  ┃  記事番号：
2610219
(SS)C-BOARD v3.8 is Free