Ｐａｇｅ 326 ━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━ 通常モードに戻る ┃ ＩＮＤＥＸ ┃ ≪前へ │ 次へ≫ ━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━ ▼ＥＸＣＥＬについて aki 02/11/11(月) 16:04 ┗Re:ＥＸＣＥＬについて ichinose 02/11/11(月) 17:11 ┗Re:ＥＸＣＥＬについて aki 02/11/11(月) 17:21 ─────────────────────────────────────── ■題名 ： ＥＸＣＥＬについて ■名前 ： aki ■日付 ： 02/11/11(月) 16:04 -------------------------------------------------------------------------
| ＶＢＡの初心者です。 １つのファイルを複数でアクセスする場合、１人が使用中の場合、その他の人は使用できないようにしたいのですが・・・ |
| ▼aki さん： こんにちは。 >ＶＢＡの初心者です。 > >１つのファイルを複数でアクセスする場合、１人が使用中の場合、その他の人は使用できないようにしたいのですが・・・ だいぶ前にこのｻｲﾄでの質問の回答でした（探したけど､見つからなかったので､私がコピーしておいたものです、コピーにどなたの回答か残してなかったのですが､たぶん、このｻｲﾄの常連さんのものだと思います）。 '========================================================== Sub test() Application.DisplayAlerts = False With Workbooks.Open(Filename:=ThisWorkbook.Path & "\共有.xls", Notify:=False) If .ReadOnly Then .Close savechanges:=False MsgBox "Nogood" End If End With Application.DisplayAlerts = True End Sub 但し､ブックの共有設定がされていないブックです。 |
| ありがとうございます。 また、何かわからないことがある時は、よろしくお願いします。 |