Excel VBA質問箱 IV

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

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

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
506 / 13645 ﾂﾘｰ ←次へ　｜　前へ→
▼ 【80010】上書き保存出来なくなりました。。。 サンソン 18/6/23(土) 22:11 質問[未読]
【80011】Re:上書き保存出来なくなりました。。。 よろずや 18/6/23(土) 22:40 発言[未読]
【80013】Re:上書き保存出来なくなりました。。。 サンソン 18/6/24(日) 1:36 発言[未読]
【80012】Re:上書き保存出来なくなりました。。。 γ 18/6/23(土) 23:11 発言[未読]
【80014】Re:上書き保存出来なくなりました。。。 サンソン 18/6/24(日) 1:52 発言[未読]
【80015】Re:上書き保存出来なくなりました。。。 γ 18/6/24(日) 13:35 発言[未読]
【80010】上書き保存出来なくなりました。。。
質問  サンソン E-MAIL  - 18/6/23(土) 22:11 -
引用なし
パスワード
   お世話になります。

エクセルで複数名で使える線表の様な予定表を作っております。

作るにつれて、
・触られたくない場所はシート保護しよう。
・複数で使うブックの共有は保護の後だよね。
・当日の日付に色を付けて、「今日」を分かるようにしたいね。
・今日の色付けを、そのまま上書き保存してしまうと色が残ってしまうので、
　workbook_open()で色を付けて、記録の際はWorkbook_BeforeSaveで色を消して、Workbook_AfterSaveでもう一回色を付けよう・・・

などと作っていると・・・

いつも間にか、上書き保存を押した後そのファイルを閉じて再度開くと以前の内容が上書き保存されない状態になっていました。。（マクロの動作自体はスムーズです）
上書き保存を押した時にWorkbook_BeforeSaveもWorkbook_AfterSaveも動いているのですが・・・もちろん、Cancel=Trueなどしておりません。

VBの細かな点以前に何か大事なことが抜けている様な気がしているのですが、
お分かりになられる方おられませんでしょうか。。。

どうかよろしくお願いいたします。
【80011】Re:上書き保存出来なくなりました。。。
発言  よろずや  - 18/6/23(土) 22:40 -
引用なし
パスワード
   ＞Workbook_BeforeSaveもWorkbook_AfterSave

そんなことせんでも、

＞当日の日付に色を付けて、「今日」を分かるようにしたいね。

条件付き書式でできるんでは。
【80012】Re:上書き保存出来なくなりました。。。
発言  γ  - 18/6/23(土) 23:11 -
引用なし
パスワード
   # 既に適切解が提示されていますが。

>上書き保存されない状態になっていました。
どのようなことに基づいて、そのように判断されていますか？
もう少し詳しく。
【80013】Re:上書き保存出来なくなりました。。。
発言  サンソン E-MAIL  - 18/6/24(日) 1:36 -
引用なし
パスワード
   ▼よろずや さん：
>＞Workbook_BeforeSaveもWorkbook_AfterSave
>
>そんなことせんでも、
>
>＞当日の日付に色を付けて、「今日」を分かるようにしたいね。
>
>条件付き書式でできるんでは。

お世話になります！
あ、共有中でも条件付き書式って走るんですね(´･ω･｀)
てっきり動かないと思っていました。
この件が解決しなかったら、そちら試してみます。
【80014】Re:上書き保存出来なくなりました。。。
発言  サンソン E-MAIL  - 18/6/24(日) 1:52 -
引用なし
パスワード
   ▼γ さん：
># 既に適切解が提示されていますが。
>
>>上書き保存されない状態になっていました。
>どのようなことに基づいて、そのように判断されていますか？
>もう少し詳しく。

γ 様
お返事ありがとうございます。
下記に状況おまとめします。

1.ファイルをクリックで開く。
2.何かしらシートに書き込み、「上書き保存」を押すと、スムーズに保存されている様に見える
　（Workbook_BeforeSaveにmsgbox"セーブ前"や、Workbook_AfterSaveにmsgbox"セーブ後"を入れても表示されるので、恐らく動いているハズ。。。）
3.その後、「閉じる」を押すと、ポップアップ「保存しますか？」が表示される。
　（これもWorkbook_AfterSaveで加工しているので、理解出来る。）
4.「保存」を押そうが「保存をしない」を押そうが、次同じファイルを開くと、２や３で保存した内容が記録されておらず、１の状態で開かれる。
　（なぜ・・・？）

以上なんです。
「名前を付けて保存」した場合は書き込み内容も保存されるのですが、多ユーザーで共有のスケジュールシートなので、名前を付けて保存はしたくなくて・・・
よろしくお願いいたします。
【80015】Re:上書き保存出来なくなりました。。。
発言  γ  - 18/6/24(日) 13:35 -
引用なし
パスワード
   ありがとうございます。
共有されているブックでしたか。
共有が原因なのでしょうかね。
ほかの方の回答をおまちください。
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
506 / 13645 ﾂﾘｰ ←次へ　｜　前へ→
ページ：  ┃  記事番号：
2610219
(SS)C-BOARD v3.8 is Free