Excel VBA質問箱 IV

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

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

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
10730 / 13655 ﾂﾘｰ ←次へ　｜　前へ→
▼ 【20153】保存後のイベント TAKA 04/11/29(月) 21:02 質問[未読]
【20156】Re:保存後のイベント ちゃっぴ 04/11/29(月) 23:37 回答[未読]
【20223】Re:保存後のイベント TAKA 04/12/2(木) 11:17 お礼[未読]
【20224】Re:保存後のイベント TAKA 04/12/2(木) 12:10 質問[未読]
【20240】Re:保存後のイベント ちゃっぴ 04/12/2(木) 20:18 回答[未読]
【20153】保存後のイベント
質問  TAKA  - 04/11/29(月) 21:02 -
引用なし
パスワード
   マクロ付きの既存ファイルをコピー新規で開き(*)、保存後（ファイル名確定）に自分の
ファイル名をＤＢ保存したいのですが、保存後というイベントは無いのでしょうか？

無い場合、ファイルの保存後にマクロを動かせるような手は無いでしょうか？

(*)既存ファイルを選択し、右クリックで新規作成
【20156】Re:保存後のイベント
回答  ちゃっぴ  - 04/11/29(月) 23:37 -
引用なし
パスワード
   >無い場合、ファイルの保存後にマクロを動かせるような手は無いでしょうか？

BeforeSave Eventで通常の保存を無効化して、
VBAで保存するようにします。

で、そのあとに任意の処理を書いてやればいいでしょう。
【20223】Re:保存後のイベント
お礼  TAKA  - 04/12/2(木) 11:17 -
引用なし
パスワード
   >BeforeSave Eventで通常の保存を無効化して、
>VBAで保存するようにします。
>
>で、そのあとに任意の処理を書いてやればいいでしょう。

なるほど！
参考になりました。
ありがとうございます。
【20224】Re:保存後のイベント
質問  TAKA  - 04/12/2(木) 12:10 -
引用なし
パスワード
   ▼TAKA さん：
>>BeforeSave Eventで通常の保存を無効化して、
>>VBAで保存するようにします。
>>
>>で、そのあとに任意の処理を書いてやればいいでしょう。

たびたびすみませんがご教示ください。
保存を無効化するために、Workbook_BeforeSaveに下記のように
SavedプロパティをTrueにしましたが、無効化されず
exit subの後に保存されてしまいます。

ActiveWorkbook.Saved = True
Application.EnableEvents = False　　'イベントの二重起動を防止するために追加
exit sub

やり方が違うのでしょうか？
【20240】Re:保存後のイベント
回答  ちゃっぴ  - 04/12/2(木) 20:18 -
引用なし
パスワード
   ヘルプを熟読してください。
使用例もちゃんと載っています。

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, _
　　　　　　　　　　　　　　　　Cancel As Boolean)
　　' ブックの保存をキャンセル
　　Cancel = True
　　' ブックを上書き保存
　　ThisWorkbook.Save
　　' 処理
　　
End Sub
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
10730 / 13655 ﾂﾘｰ ←次へ　｜　前へ→
ページ：  ┃  記事番号：
2610219
(SS)C-BOARD v3.8 is Free