機能と数式 | VBA | セミナー | オンラインソフト | お問い合わせ | その他
Top > Excel > VBA > FileSystemObject

FileSystemObjectオブジェクト - GetExtensionNameメソッド



【書式】
FileSystemObject.GetExtensionName(path)

ファイルの拡張子を返します。ピリオドは含みません。
引数pathにはファイル名を指定します。
ファイル名のうち拡張子を除くベース名を取得するにはGetBaseNameプロパティを使います。
Sub test16()
    Dim FSO As Object
    Set FSO = CreateObject("Scripting.FileSystemObject")
    ''xlsを返します
    MsgBox FSO.GetExtensionName("C:\Work\Book1.xls")
    Set FSO = Nothing
End Sub



このエントリーをはてなブックマークに追加