Excel VBA質問箱 IV

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

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


32742 / 76734 ←次へ | 前へ→

【49226】Re:エクセルで一つのブックしか開けなくする方法は?
発言  りん E-MAIL  - 07/5/28(月) 6:38 -

引用なし
パスワード
   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

こんな感じです。

4 hits

【49199】エクセルで一つのブックしか開けなくする方法は? furuya 07/5/27(日) 14:55 質問
【49212】追加補足 furuya 07/5/27(日) 22:05 質問
【49225】Re:エクセルで一つのブックしか開けなくす... りん 07/5/28(月) 6:31 回答
【49230】Re:エクセルで一つのブックしか開けなくす... ichinose 07/5/28(月) 8:07 発言
【49226】Re:エクセルで一つのブックしか開けなくす... りん 07/5/28(月) 6:38 発言

32742 / 76734 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free