□ 戻る □一般操作のサロン □ 使用方法 □ 新着記事 □ 新規に質問する！ □ トピック一覧 □ 検索 □ 過去ログ
[ 最新記事及び返信フォームをトピックトップへ ]
| シート変更の有無調べ | |
|---|---|
[196461] シート変更の有無調べ- ■親トピック/記事引用/メール受信=OFF■ □投稿者/ nagahaha -(2025/02/07(13:27)) □U R L/ ブックが開かれてから閉じるまでの間に、 シートに何らかの変更があったかを調べたいのですが、 ズバリのステータスコードなどはありますか。 それとも、シートの比較をしなければなりませんか。 宜しくお願いします。 ++++++++++++++++++++ OS ⇒OTHER Version⇒Excel 2003 ++++++++++++++++++++ | |
[196462] Re[1]: シート変更の有無調べ- ■  / 記事引用/メール受信=OFF■
□投稿者/ nagahaha -(2025/02/07(14:03)) □U R L/ どうも調べが足りずにお騒がせしました。 『saved』で可能みたいです。 ++++++++++++++++++++ OS ⇒Windows 10 Version⇒Excel 2003 ++++++++++++++++++++ | |
[196463] Re[1]: シート変更の有無調べ- ■記事引用/メール受信=OFF■ □投稿者/ 半平太 -(2025/02/07(14:12)) □U R L/ Copilotに聞いてみると、こんな回答がありました。 以下のコードをThisWorkbookモジュールに追加してください。 Ｄｉｍ ＩｓＳｈｅｅｔＣｈａｎｇｅｄ Ａｓ Ｂｏｏｌｅａｎ Ｐｒｉｖａｔｅ Ｓｕｂ Ｗｏｒｋｂｏｏｋ＿Ｏｐｅｎ（） ＩｓＳｈｅｅｔＣｈａｎｇｅｄ ＝ Ｆａｌｓｅ Ｅｎｄ Ｓｕｂ Ｐｒｉｖａｔｅ Ｓｕｂ Ｗｏｒｋｂｏｏｋ＿ＳｈｅｅｔＣｈａｎｇｅ（ＢｙＶａｌ Ｓｈ Ａｓ Ｏｂｊｅｃｔ， ＢｙＶａｌ Ｔａｒｇｅｔ Ａｓ Ｒａｎｇｅ） ＩｓＳｈｅｅｔＣｈａｎｇｅｄ ＝ Ｔｒｕｅ Ｅｎｄ Ｓｕｂ Ｐｒｉｖａｔｅ Ｓｕｂ Ｗｏｒｋｂｏｏｋ＿ＢｅｆｏｒｅＣｌｏｓｅ（Ｃａｎｃｅｌ Ａｓ Ｂｏｏｌｅａｎ） Ｉｆ ＩｓＳｈｅｅｔＣｈａｎｇｅｄ Ｔｈｅｎ ＭｓｇＢｏｘ ”シートに変更がありました。” Ｅｌｓｅ ＭｓｇＢｏｘ ”シートに変更はありませんでした。” Ｅｎｄ Ｉｆ Ｅｎｄ Ｓｕｂ 閉じるときにメッセージが表示されます。 | |
[196464] Re[2]: シート変更の有無調べ- ■記事引用/メール受信=OFF■ □投稿者/ nagahaha -(2025/02/07(14:15)) □U R L/ どうも落ち着きがなく、申し訳ありません。 やはりありませんでした。 ブックについては『saved』で出来ましたが、 シートについては見つけられませんでした。 解決を消させていただきました。 引き続き、宜しくお願いします。 ++++++++++++++++++++ OS ⇒Windows 10 Version⇒Excel 2003 ++++++++++++++++++++ | |
[196465] Re[2]: シート変更の有無調べ- ■記事引用/メール受信=OFF■ □投稿者/ 半平太 -(2025/02/07(14:15)) □U R L/ ＞『saved』で可能みたいです。 それだと、変更した後、保存もしていたらアウトじゃないですか？ ※問題なければ、スルーしてください。 | |
[196466] Re[3]: シート変更の有無調べ- ■ / 記事引用/メール受信=OFF■
□投稿者/ nagahaha -(2025/02/07(14:25)) □U R L/ 半平太様 毎回ありがとうございます。 どうも書き込みがかち合ったみたいで。 最終的にわかりました。 ずばり、『saved』のようなステータスは立たないので、 調べていただいたようなロジックを書く必要が在る、 ということですね。 出来る事はわかりましたので、 対応方法は考えてみます。 ++++++++++++++++++++ OS ⇒Windows 10 Version⇒Excel 2003 ++++++++++++++++++++ | |