|
furuya さん、おはようございます。
>たとえば、ある特定のエクセルのブックを開いている間は、後から他のブックを開こうとしても開けないように設定することは可能でしょうか。
>ある特定のブックと同時に他のブックを開きたくないのです。
開いているものにも、これから開こうとするものにも、非表示ブックがないという前提ならClassを使用しなくてもいい方法もあります。
すべてThisworkbookに記述します。
Private Sub Workbook_Deactivate()
Dim wb As Workbook
For Each wb In Application.Workbooks
ます。
If wb.FullName <> ThisWorkbook.FullName Then _
WBC wb, "他のブックは追加できません"
Next
End Sub
'共通処理部分
Sub WBC(arg1 As Workbook, arg2 As String)
MsgBox arg2, vbExclamation, "ごめんね"
arg1.Saved = True
arg1.Close
End Sub
こんな感じです。
|
|