| |
▼yamazakiさん ponpon さん：
#【24572】二重に開く事を禁止するには
も参考させて頂きましたが、
>Ｂを開いている場合は一旦終了しない限りはＡは警告など出して
>開けないというふうにしたいのです。
Ｂという名前に限らず、他のブックが開いていたらという事でしたら
Ａのブックの「ThisWorkbook」のところに、
Private Sub Workbook_Open()
If Application.Workbooks.Count > 1 Then
MsgBox "他のエクセル画面を全て終了してからｂｂｂを開いて下さい。", 48
ActiveWorkbook.Close
End If
End Sub
で対応できるように思われます。
>無効にした場合はどうにもならないということです。
「マクロを無効にする」を選んでもマクロの自動実行ができる裏道があった場合
悪意のあるマクロの実行を防ぐ手段がなくなってしまいます。
仮にそのような方法があった場合でも（少なくとも当方は知りませんが）
それを公表する事は、yamazakiさんに悪意がなくとも
非常に危険な事に繋がると思われます。
|
|
小僧
- 05/5/3(火) 1:48 -
