FileSystemObject:8.3形式のファイル名(フォルダ名)またはパスを取得(ShortPath, ShortName)
8.3形式のファイル名(フォルダ名)またはパスを取得(ShortPath, ShortName)
FileSystemObject(FSO)で、指定したファイルまたはフォルダの 8.3形式のパスを取得するには、File オブジェクト または、Folder オブジェクトの ShortPath プロパティ を使用します。
また、FileSystemObject(FSO)で、指定したファイルまたはフォルダの 8.3形式の名前を取得するには、File オブジェクト または、Folder オブジェクトの ShortName プロパティ を使用します。
FileSystemObject(FSO)のインスタンスを生成する方法は、ファイルシステムオブジェクト(FileSystemObject)の使い方 を参照してください。
<8.3 形式のパスを取得>
object.ShortPath
<8.3 形式の名前を取得>
object.ShortName
引数・戻り値
- object ・・・ File オブジェクトまたは、Folder オブジェクトを指定します。
File オブジェクトに関しては、FileSystemObject:File オブジェクトを取得(GetFile) 、Folder オブジェクトに関しては、FileSystemObject:Folder オブジェクトの取得 を参照してください。
ShortPath・ ShortName プロパティ 使用例
サンプルVBAソース
1 2 3 4 5 6 7 8 9 10 11 12 |
Sub Sample_ShortPathName() Dim fso As New FileSystemObject Dim myFile As File Set myFile = fso.GetFile("C:\Documents\mydata3\新規 Microsoft Excel Worksheet.xlsx") MsgBox myFile.ShortName & vbCrLf & myFile.ShortPath End Sub |
実行結果
関連記事
-
FileSystemObject:ファイルをコピー(CopyFile メソッド)
ファイルをコピーする(CopyFile メソッド) FileSystemObje …
-
FileSystemObject:ファイル・フォルダの最終更新日時を取得(DateLastModified プロパティ)
ファイル・フォルダの最終更新日時を取得(DateLastModified プロパ …
-
FileSystemObject:ファイルを開く(OpenAsTextStream メソッド)
ファイルを開く(OpenAsTextStream メソッド) 指定されたファイル …
-
FileSystemObject:ドライブの存在確認(DriveExists メソッド)
ドライブの存在確認(DriveExists メソッド) FileSystemOb …
-
FileSystemObject:フォルダをコピー(CopyFolder メソッド)
フォルダをコピー(CopyFolder メソッド) FileSystemObje …
-
FileSystemObject:ファイルを開く・閉じる(OpenTextFile ,Close)
ファイルを開く(OpenTextFile メソッド) FileSystemObj …
-
TextStream ファイルの位置(AtEndOfLine,AtEndOfStream,Column,Line)
AtEndOfLine プロパティ 開いたファイル(TextStream ファイ …
-
FileSystemObject:ファイルの存在確認(FileExists メソッド)
ファイルの存在確認(FileExists メソッド) FileSystemObj …
-
TextStream ファイルで、指定された読み込み位置に移動(Skip,SkipLine)
Skip メソッド 開いた TextStream ファイルで、指定された文字数を …
-
FileSystemObject:テキストファイルを操作する(TextStream オブジェクト)
TextStream オブジェクト FileSystemObject(FSO)の …