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 を使っています。コメントデータの処理方法の詳細はこちらをご覧ください

  関連記事

画面の上端・左端を設定(ScrollRow プロパティ、ScrollColumn プロパティ)

画面の上端・左端を設定 ScrollRow プロパティで、指定した行を画面上端に …

ウィンドウのタイトル(Window.Caption プロパティ)

ウィンドウのタイトル(Caption プロパティ) Windows.Captio …

ページ数に合わせて印刷(FitToPagesTall, FitToPagesWide)

PageSetup.FitToPagesTall プロパティ PageSetup …

表示されているセル範囲を取得(VisibleRange プロパティ)

VisibleRange プロパティ 現在表示されているセル範囲(Range オ …

印刷設定(偶数ページのヘッダー・フッターを設定)OddAndEvenPagesHeaderFooter, EvenPage

偶数ページに別のヘッダーおよびフッターを設定 偶数ページのヘッダーおよびフッター …

CreateBackup プロパティ 実行前
保存時にバックアップファイルが作成されるかどうかを確認(CreateBackup プロパティ)

バックアップファイルが作成されるかどうかを確認 CreateBackup プロパ …

印刷設定(ヘッダーに文字列を指定)LeftHeader,CenterHeader,RightHeader

PageSetup.LeftHeader プロパティ PageSetup.Lef …

Excel を全画面表示(DisplayFullScreen プロパティ)

DisplayFullScreen プロパティ DisplayFullScree …

印刷設定(フッターに画像を指定)LeftFooterPicture,CenterFooterPicture,RightFooterPicture

フッターに画像を表示するには LeftFooterPicture プロパティ、C …

ワークシートを参照する(Worksheets プロパティ)

Worksheets プロパティ Worksheets プロパティは、Works …