Excelシート数を取得

<< エクセルVBAでExcelシート名を取得する :前の記事

こちらでは、SheetsコレクションオブジェクトCountプロパティを利用して、Excelのシート数を取得する方法について解説しています。

プロパティとはオブジェクトの属性を指します。属性とは、そのオブジェクトの情報そのものです。プロパティはその値を取得したり、設定することもできます。プロパティを利用するにはオブジェクト名とプロパティ名の間に「.(ピリオド)」で結んで記述します。

オブジェクト名.プロパティ名

また、プロパティを設定する場合は以下のように「=(イコール)」を記述し設定値を代入します。

オブジェクト名.プロパティ名 = 設定値

目次

はじめに

こちらでは、Countプロパティを利用したExcelの指定したシート数を取得にする方法について解説します。今回は、SheetsコレクションオブジェクトのCountプロパティを利用しますが、CountプロパティはSheetsコレクションオブジェクト以外でも利用されますので、どのオブジェクトで利用できるかも確認してください。

利用するプロパティについて

今回利用するプロパティは以下になります。

Countプロパティとは

SheetsコレクションオブジェクトのCountプロパティSheetsコレクションに含まれるシート数を取得をします。

変数 = Sheets.Count

MsgBox関数とは

MsgBox関数ダイアログボックスにメッセージとボタンを表示し、どのボタンが押されたかを示す整数型の数値を返します。

MsgBox "表示させる文字列"

シート数を取得するサンプルコード

今回のVBAコードはExcelのシート数を取得するマクロになります。


Sub sample()

    MsgBox "シート数は" & Sheets.Count & "です。"

End Sub

※ドラッグ(スワイプ)すると全体を確認できます。

実行結果

エクセルVBAのCountプロパティの結果

解説

sampleプロシージャSubステートメントに引数は設定されていません。そして、MsgBox関数の引数にメッセージが設定されています。メッセージの中では、SheetsコレクションオブジェクトのCountプロパティが設定されており、シートの数を返します。最後はEndステートメントを利用してsampleプロシージャを終了させます。

まとめ

今回は、SheetsコレクションオブジェクトのCountプロパティを利用して、Excelのシート数を取得する方法について解説しました。次回は、エクセルVBAでExcelシート見出しの色を変更する方法について解説します。

エクセルVBAのワークシート操作一覧

次の記事: エクセルVBAでExcelシート見出しの色を変更する >>

Excel VBAでIEを思いのままに操作できるプログラミング術 Excel 2013/2010/2007/2003対応

IEのデータ収集&自動操作のプログラミング本はこの1冊だけ!IEの起動やポップアップウィンドウ、表示を制御する基本的なコードはもちろん、テキストボックスやラジオボタン、表、ハイパーリンクなどのHTML部品を制御する方法など、自動操作に欠かせないノウハウを丁寧に解説。

ExcelのVBAについてのQ&A掲示板

↑ExcelのVBA全般について分からない事があればこちらの掲示板よりご質問ください。

VBAのIE操作入門

↑ExcelのVBAをマスターできたら、エクセルVBAのIE操作にも挑戦してみてください。

目次

VBAのステートメント

こちらでは、エクセルVBAの事例で利用したステートメントをまとめたものです。ExcelのVBAには様々な機能が用意されていますので一度ご確認ください。

VBAのオブジェクト

こちらでは、エクセルVBAの事例で利用したオブジェクトをまとめたものです。ExcelのVBAには様々な機能が用意されていますので一度ご確認ください。

VBAのプロパティ

こちらでは、エクセルVBAの事例で利用したオブジェクトのプロパティをまとめたものです。ExcelのVBAには様々な機能が用意されていますので一度ご確認ください。

VBAのメソッド

こちらでは、エクセルVBAの事例で利用したオブジェクトのメソッドをまとめたものです。ExcelのVBAには様々な機能が用意されていますので一度ご確認ください。

VBAのイベント

こちらでは、エクセルVBAの事例で利用したオブジェクトのイベントをまとめたものです。ExcelのVBAには様々な機能が用意されていますので一度ご確認ください。