プロが教える店舗&オフィスのセキュリティ対策術

CSVファイルのファイル名を取得するにあたり、下記構文をつけたのですが、拡張子の.csvも取得してしまいます。どのように変更すれば良いのでしょうか?
'ファイル名をA列にセット
.Range("A" & n).Resize(n1).Value = MyFnm

A 回答 (1件)

MyFnmって配列変数ですよね?であれば、MyFnm(n) に格納する時点で拡張子をカットすべきです。


拡張子をカットするには、

MyFnm(n) = Left(拡張子付きファイル名, InStrRev(拡張子付きファイル名, ".") - 1)
    • good
    • 0
この回答へのお礼

ありがとうございます。全文を再掲出しますので、どこに入れれば良いかご教示願います。

お礼日時:2016/05/10 00:03

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!