-PR-

解決済みの質問

質問No.4141776
すぐに回答を!
すぐに回答を!
お気に入り投稿に追加する (0人が追加しました)
回答数1
閲覧数1525
VBAエクセル・・・フォルダ名を取得する
VBA初心者です。
マクロで、ヘッダー部分にフォルダ名を入力したいのですが、
どのように取得すればよいでしょうか?

ThisWorkbook.Path にすると、パスが出てきますが、
\C:\***\△△△\○○○\XXX.xls
だとすると、「○○○」だけを入力したいのですが・・・

よろしくお願いいたします。
投稿日時 - 2008-06-30 22:34:04

質問者が選んだベストアンサー

回答No.1
幾つか方法があります。
(C:\ABC.xlsの場合は修正の必要あり)

Dim tmp As String
Dim ary As Variant

tmp = ThisWorkbook.Path
'Split を使う
ary = Split(tmp, "\")
MsgBox ary(UBound(ary))
'文字列関数を使う
MsgBox Right(tmp, Len(tmp) - InStrRev(tmp, "\"))
投稿日時 - 2008-06-30 23:11:25
この回答を支持する
(現在0人が支持しています)
お礼
ご丁寧な回答ありがとうございました。
投稿日時 - 2008-06-30 23:52:31
この質問は役に立ちましたか?
2人が「このQ&Aが役に立った」と投票しています
もっと聞いてみる

関連するQ&A

この他の関連するQ&Aをキーワードで探す

別のキーワードで再検索する

回答募集中

同じカテゴリの人気Q&Aランキング

カテゴリ
Visual Basic
-PR-
-PR-

特集

背筋がゾクゾクする心霊体験を要チェック!

お城、ボート、ツリーハウス、ユニークな物件満載!

【期間限定】1ヶ月無料キャンペーン中!

このQ&Aの関連キーワード

同じカテゴリの人気Q&Aランキング

カテゴリ
Visual Basic
-PR-

回答のついた最新のQ&A

カテゴリ
Visual Basic

rss

fbs1111

Q_icon削除が実行されない2014-07-16 22:06:10

x001

x-1919

ピックアップ

-PR-