[[20050104205202]]　『マクロ有効を選択時のみブックが開く』（ジャン）　ページの最後に飛ぶ

『マクロ有効を選択時のみブックが開く』（ジャン）

マクロを設定したファイルは、開くときに「マクロを有効にしますか」というメッセージが出ます。
ここで「いいえ」を選んだ時には、そのブックが開かず、「はい」を選んだ時だけブックが開くようにするコードって、ありますか？
あれば是非教えていただきたいのですが。
宜しくお願い致します。

 「いいえ」を選んだ時点ですでにマクロは無効になっているので、
どんなコードを書いたところで開いてしまいます。
意図としては「必ずマクロを実行できる形でブックを開きたい」
ということであると思いますので、
【１】マクロから開く
Personal.xlsへそのブックを開くコードを記述し、ツールバーなどに登録した
ユーザー設定ボタンなどからファイルを開くようにする。
　
【２】無効の場合は非表示にしてしまう
該当ブックのThisWorkbookモジュールへ下記コード
Private Sub Workbook_BeforeClose(Cancel As Boolean)
    Windows("aaa.xls").Visible = False
    ThisWorkbook.Save
End Sub
Private Sub Workbook_Open()
    Windows("aaa.xls").Visible = True
End Sub
クローズ時にウィンドウ非表示の状態で保存されます。
マクロ無効の状態ではウィンドウ非表示状態です。
ただし、二重に開くと混乱しそう。
　
【３】VBSファイルでファイルを開く
ブックアイコンをダブルクリックとかではなくて
デスクトップにおいたVBSファイルをダブルクリックして開く方法。
　
[[20041015103422]]『マクロの警告』（ちぇしゃねこ）
↑後半でINAさんが紹介しています。 
　
（みやほりん）

みやほりんさん有難うございました。
【3】はとても便利ですね。早速利用させて頂きます。
自分以外が使用する場合は【2】が宜しいようですね。
有難うございました。(ジャン)

コメント返信：

[ 一覧(最新更新順) ]

[[20050104205202]] 『マクロ有効を選択時のみブックが開く』（ジャン） ページの最後に飛ぶ

[[20050104205202]]　『マクロ有効を選択時のみブックが開く』（ジャン）　ページの最後に飛ぶ