|
こんにちは。かみちゃん です。
>この取得した、ファイル名ですが
ですから・・・
ファイル名なのですか?フォルダ名ではなかったのですか?
>>> まず、確認したいのですが、取得したいのは、フォルダ名なのですか?
>>ファイル名なのですか?
>>「名前」という中途半端な表現を使わずに、どちらかハッキリさせてください。
>>また、フォルダの中にあるサブフォルダを検索対象にするのですか?
>>しないのですか?
>
>
> 取得したいのは「フォルダ名」です。
と、おっしゃっていませんでしたか?
なのに、なぜ、突然、「ファイル名」の話が出てくるのでしょうか?
また、通常、
C:\My Documents\My Music\Singer1\Album11\Music_aaa.wma
というフルパスの場合、
Singer1
がアーティスト名
Album11
がアルパム名
Music_aaa.wma
が曲名
になっていると思います。
これが、Singer1というアーティストのMusic_aaaという曲名の場合、
C:\My Documents\My Music\Singer1 Music_aaa\xxxx.wma
となっているということなのでしょうか?
この場合、xxxx.wma の部分は、ファイル名なのですが、この部分は、何になっているのでしょうか?
要するに、1曲1つのフォルダなのですか?
> Folder_List.Nameから半角ないし、全角のスペースを
> 見つけてわけるのでしょうか?
文字列(フォルダ名)から半角スペース、全角スペースで区切って取得したいのならば、
どちらかに統一して、Split関数で分けます。
Sub Test()
Dim ss As String
ss = "Singer1 Music_aaa"
Cells(1, 1).Resize(, 2).Value = Split(StrConv(ss, vbNarrow), " ")
End Sub
|
|