ファイル名から拡張子を取った文字列を取得する例ファイル名を　 TestFile.xlsm　とします。InStrRev(strFileNameB, ".")で、ファイル名の中の「.」を後ろから検索して（前から）何文字目にあるかを調べています。ここでは、結果が 9 になるので、 8文字目までを取得すれば拡