ExcelWork.info

Excel(エクセル)のマクロ・VBA・関数・操作などのメモ

ブックが共有モードか確認する(MultiUserEditing プロパティ)

   

ブックが共有モードか確認する(MultiUserEditing プロパティ)

共有モードでブックを開くと、Workbook オブジェクトMultiUserEditing プロパティTrue を返します。排他モードで開くと MultiUserEditing プロパティFalse を返します。


【書式】

object.MultiUserEditing


引数・戻り値

  • object  ・・・  対象となる Workbook オブジェクトを指定します。
  • 戻り値  ・・・  ブール型(Boolean)の値を使用します。共有モードの場合、True を、排他モードの場合、False を返します。


共有モードと排他モードの切り替え

共有モードで開いたブックを排他モードに切り替えには、ExclusiveAccess メソッド を使用します。また、排他モードで開いたブックを共有ファイルとして保存するには、SaveAs メソッド を使用します。


ExclusiveAccess メソッド


【書式】

object.ExclusiveAccess


引数・戻り値

  • object  ・・・  対象となる Workbook オブジェクトを指定します。

ExclusiveAccess メソッドを実行すると、実行したユーザーによるブックの変更内容はすべて保存されますが、同じブックを開いている他のユーザーは、それらの変更内容を別のファイルとして保存する必要があります。

指定したブックが共有ファイルとして開かれていない場合、このメソッドは失敗します。


SaveAs メソッド


【書式】

object.SaveAs ( filename, accessmode )


引数・戻り値

  • object  ・・・  対象となる Workbook オブジェクトを指定します。
  • filename  ・・・  保存するブックの名前を指定します。拡張子を省略すると Excel によって自動的に付加されます。また、完全パスを含めることもできます。完全パスを含めない場合、カレントフォルダに保存されます。
  • accessmode  ・・・  ファイルへのアクセス方法を表す XlSaveAsAccessMode 列挙型 の定数またはその値を指定します。
    定数 内容
    xlNoChange 1 アクセスモードを変更しません(既定値)
    xlShared 2 共有モード
    xlExclusive 3 排他モード


SaveAs メソッド の詳細に関しては、ブックを別名で保存(SaveAs メソッド) を参照してください。



MultiUserEditing プロパティ 使用例

サンプルVBAソース


実行結果

MultiUserEditing プロパティ



 - ブック・シートの操作 , , , , , ,

Message

メールアドレスが公開されることはありません。 * が付いている欄は必須項目です

このサイトはスパムを低減するために Akismet を使っています。コメントデータの処理方法の詳細はこちらをご覧ください

  関連記事

スクロール(LargeScroll メソッド、Smallscroll メソッド)

ワークシートをスクロールする ワークシートをスクロールするには、LargeScr …

ワークシートをファイルに保存する(SaveAs メソッド)

SaveAs メソッド ワークシートを名前を付けてファイルに保存します。Work …

前後のワークシートを参照する(Previous プロパティ,Next プロパティ)

Previous プロパティ 指定したシートの前(左側)のシートを参照します。 …

RemoveDocumentInformation メソッド
指定された情報をブックから削除(RemoveDocumentInformation メソッド)

RemoveDocumentInformation メソッド 指定された種類の情 …

PrecisionAsDisplayed プロパティ 01
計算精度を設定する(PrecisionAsDisplayed プロパティ)

PrecisionAsDisplayed プロパティ PrecisionAsDi …

ブックを別名で保存(SaveAs メソッド)

ブックを別名で保存(SaveAs メソッド) ブックの変更を保存したり、新規ブッ …

印刷位置を中央に設定(CenterHorizontally, CenterVertically)

PageSetup.CenterHorizontally プロパティ PageS …

新しいウィンドウを開く(NewWindow メソッド)

NewWindow メソッド NewWindow メソッドで、任意のブックのコピ …

印刷実行前に総ページ数を取得(ExecuteExcel4Macro メソッド)

印刷の総ページ数を取得(ExecuteExcel4Macro メソッド) Exc …

ワークシートの追加・削除(Add メソッド・Delete メソッド)

新しいワークシートを作成 Add メソッドで、新しいワークシートを指定した場所に …