共有で開いたファイルを変更不可にする
サンプルソース
|
' 共有で開いたファイルを変更不可にする If ThisWorkbook.MultiUserEditing Then ThisWorkbook.ExclusiveAccess End If |
解説
ExclusiveAccessで共有ファイルとして開いているブックを、他のユーザーが変更できないようにします。
実行すると、実行したユーザーによるブックの変更内容は保存できますが、同じブックを開いている他のユーザーは変更内容を保存できず、別のファイルとして保存する必要があります。
指定したブックが共有ファイルとして開かれていない場合エラーになります。
MultiUserEditingでブックが共有ファイルとして開かれているかどうかを調べておきます。