F108 ファイルのシート数を表示する関数

Excel自作 VBA 関数　

ブック内のシート数を表示する関数です。
画面に表示することで、非表示の数を知ったりシートの管理が容易になります。

VBEの標準モジュールに下のコードを登録して「Excelマクロ有効フォーム」で保存してください。
関数の登録方法は⇒♯000 ユーザー定義関数を登録する方法

登録されたら、シート上からユーザー関数「AcPrinter」が使用できます。
使い方は　
ワークシート上で = CWorkSheets()の関数として使用することで、 選択範囲より左の列の値を抽出できます。

CWorkSheets()
ブック内のシート数を表示する関数（非表示シートもカウントする）

[例]
CWorkSheets()→３

Function CWorkSheets() As Long

'ファイルのワークシートの数を計算する関数
'例 CWorkSheets()⇒　2

On Error GoTo EXITFUN

CWorkSheets = Worksheets.Count

EXITFUN:
End Function

ここで紹介したコード使用による損害に対しては一切責任は負えません。