フォルダのプロパティ内容の取得-VBA

サブフォルダとファイルを含むフォルダのプロパティを開くと、 内容欄にファイル数(サブフォルダ内のファイルを含む)とフォルダ数が表示されます。 このファイル数をVBAにて取得する方法を教えて下さい。 特定のフォルダを指定し、そのフォルダ内だけのファイル数取得する方法は、 インターネット上に散見されますが、 サブフォルダ内のファイルを含むファイル数を一発で取得する方法が見つかりません。