ワークシートの数を数える(Count プロパティ)
Count プロパティ
指定したWorksheets コレクションやSheets コレクションに含まれるワークシートの数(長整数型:Long の値)を取得します。
【書式】
object.Count
項目の説明
- object ・・・ 対象となる Worksheets コレクション、Sheets コレクションを指定します。
Worksheets コレクションは、ワークシートのみを扱います。Sheets コレクションは、ワークシートとグラフシートの両方を扱います。
Count プロパティ 使用例
サンプルVBAソース
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 |
Sub Sample_Count() Dim str1 As String, str2 As String, i As Integer For i = 1 To Sheets.Count str1 = str1 & Sheets(i).Name & Chr(13) Next i For i = 1 To Worksheets.Count str2 = str2 & Worksheets(i).Name & Chr(13) Next i MsgBox "Sheets.Count:" & Sheets.Count & Chr(13) & _ str1 & Chr(13) & _ "Worksheets.Count:" & Worksheets.Count & Chr(13) & _ str2 End Sub |
実行結果
関連記事
-
-
ワークシートのコピー・移動(Copy メソッド Move メソッド)
Copy メソッド Copy メソッドで、指定した位置にワークシートの複製を作成 …
-
-
ブックの表示・非表示(Visible プロパティ)
ブック表示・非表示(Visible プロパティ) ブック(ウィンドウ)が表示され …
-
-
ファイル保存の既定の形式を取得・設定(DefaultSaveFormat プロパティ)
DefaultSaveFormat プロパティ DefaultSaveForma …
-
-
行列の見出しの表示・非表示(DisplayHeadings プロパティ)
DisplayHeadings プロパティ 行と列の見出しの表示・非表示を設定お …
-
-
印刷:余白を設定 TopMargin,BottomMargin,LeftMargin,RightMargin,HeaderMargin,FooterMargin
余白を設定する 余白を設定する単位は、pt(ポイント:約 0.03528 cm) …
-
-
分割したウィンドウの取得(Panes コレクション,Pane オブジェクト)
分割したウィンドウ 「ウィンドウ枠の固定」や「ウィンドウの分割」での、すべての領 …
-
-
ブックを開く(Open メソッド)
ブックを開く(Open メソッド) ブックを開くには、Workbooks コレク …
-
-
印刷範囲の設定・解除(PageSetup.PrintArea プロパティ)
PageSetup.PrintArea プロパティ 印刷範囲を設定するには、Pa …
-
-
保存時にバックアップファイルが作成されるかどうかを確認(CreateBackup プロパティ)
バックアップファイルが作成されるかどうかを確認 CreateBackup プロパ …
-
-
ワークシートを参照する(Worksheets プロパティ)
Worksheets プロパティ Worksheets プロパティは、Works …