ExcelWork.info

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

共有ファイルを開いているユーザー情報を取得(UserStatus プロパティ)

      2015/12/19

共有ファイルを開いているユーザー情報を取得

UserStatus プロパティは、ブックを共有ファイルとして開いている各ユーザーの情報を示す、2 次元配列を返します。値の取得のみ可能で、バリアント型(Variant)の値を使用します。


【書式】

object.UserStatus ( index1, index2 )


引数・戻り値

  • object  ・・・  対象となる Workbook オブジェクトを指定します。
  • index1  ・・・  各ユーザーを示すインデックス値を指定します( 1 から始まる 数値)。
  • index2  ・・・   1 から 3 の整数値を指定します。1 を指定すると ユーザー名、2 を指定すると ユーザーがブックを最後に開いた日付・時刻、3 を指定すると ファイルの種類 を取得することができます。また、3 を指定した場合、ファイルの種類が 排他 であれば、1 を、共有 であれば、2 を返します。

ブックを開いているユーザー数を取得するには、UBound 関数 を使用します。
(例)アクティブなブックを開いているユーザーの数
  UBound ( ActiveWorkbook.UserStatus )

読み取り専用で開いたブックの UserStatus プロパティを取得しようとするとエラーが発生します。



UserStatus プロパティ 使用例

サンプルVBAソース


実行結果

UserStatus プロパティ



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

Message

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

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

  関連記事

ウィンドウの位置を入れ替える(ActivatePrevious メソッド、ActivateNext メソッド)

ウィンドウの位置を入れ替える ActivatePrevious メソッド、Act …

余白・ヘッダー
印刷:余白を設定 TopMargin,BottomMargin,LeftMargin,RightMargin,HeaderMargin,FooterMargin

余白を設定する 余白を設定する単位は、pt(ポイント:約 0.03528 cm) …

印刷の先頭のページ番号を設定(PageSetup.FirstPageNumber プロパティ)

PageSetup.FirstPageNumber プロパティ PageSetu …

PrintCommunication プロパティ 使用例
印刷設定を高速化(PrintCommunication プロパティ)

PrintCommunication プロパティ PrintCommunicat …

DisplayHeadings プロパティ
行列の見出しの表示・非表示(DisplayHeadings プロパティ)

DisplayHeadings プロパティ 行と列の見出しの表示・非表示を設定お …

印刷設定(ページごとに異なるヘッダー・フッターを設定)Page オブジェクト・HeaderFooter オブジェクト

Page オブジェクト ページごとに異なるヘッダーおよびフッターを設定する場合、 …

Copy メソッド Move メソッド 使用例
ワークシートのコピー・移動(Copy メソッド Move メソッド)

Copy メソッド Copy メソッドで、指定した位置にワークシートの複製を作成 …

EnableEvents プロパティ
イベントの発生・無効をコントロール(EnableEvents プロパティ)

EnableEvents プロパティ EnableEvents プロパティに T …

数式を表示(DisplayFormulas プロパティ)

数式を表示(DisplayFormulas プロパティ) セルに数式が入力されて …

枠線を含めて印刷(PageSetup.PrintGridlines プロパティ)

PageSetup.PrintGridlines プロパティ PageSetup …