- ベストアンサー
エクセル VBA フルパスからファイル名
エクセルのセルに以下の情報が入っています。 １ D:\borland\bc55\license.txt ２ D:\borland\bc55\readme.txt ・ ・ ・ ｎ C:\borland\bcc55\Include\methodcontext.h フルパスの中のファイル名のみ取得したいですが、 VBAの初心者でなかなかできないです。 ご教授お願いいたします。
- shenyanhe
- お礼率62% (18/29)
- Visual Basic
- 回答数2
- ありがとう数1
- みんなの回答 （2）
- 専門家の回答
質問者が選んだベストアンサー
コンなのは、小手先の技なので、いろいろ方法はあるとおもう。 一例 Sub test01() For i = 1 To 2 a = Cells(i, "A") s = Split(a, "\") f = s(UBound(s)) MsgBox f Next i End Sub を参考に。 例データ A1:A2 D:\borland\bc55\license.txt D:\borland\bc55\readme.txt 結果（表示） license.txt readme.txt
その他の回答 (1)
- edomin7777
- ベストアンサー率40% (711/1750)
お礼
ありがとうございます。 このサイトを参考にしましたが、できなかったです。
補足
抽出した結果を別のエクセルファイルに出力したいです。
関連するQ&A
- エクセルのフルパスをｖｂａで取得
当方エクセル２００３で、 エクセルのフルパスは C:\Program Files\Microsoft Office\OFFICE11\ EXCEL.EXE です。 それをVBAで取得するにはどうすればいいですか？ Sub サンプル() Debug.Print 'オフィスがインストールされているフォルダのパスの取得 End Sub のようにして、 C:\Program Files\Microsoft Office\OFFICE11\ EXCEL.EXE を返したいです。 VBAコードをご教示ください。
- ベストアンサー
- オフィス系ソフト
- パスをセルから取得し保存 VBA
エクセルVBAでの質問です。 Cドライブにテキスト形式で保存する場合は = xlAPP.GetSaveAsFilename(InitialFileName:="C:\test.txt",FileFilter:=cnsFILTER,Title:=cnsTITLE) となると思いますが、上記で使われている”C:\”の部分をセル(保存したいパスを入力)から取得する場合はどのように記述すればよいでしょうか？ よろしくお願いします。
- ベストアンサー
- その他MS Office製品
- Access(VBA)で「App.path」
Access(VBA)で「App.path」を使用しようとしたところエラーになりました。 Call fnFileWrite2("d:\test110.txt", … 上の形だと上手くいくのですが、下の形だと上手くいきません Call fnFileWrite2(app.Path & "\test110.txt", … Access(VBA)で「App.path」の代わりになる命令はあるのでしょうか？
- ベストアンサー
- オフィス系ソフト
- Excel VBA サブディレクトリの取得について
Excel VBA についての質問です。 私は、VBAの初心者です。 フォルダ選択ダイアログを開き、あるフォルダを選択させます。 選択したフォルダ配下のファイルとサブフォルダにあるファイル一覧とそのファイルのパス取得したいです。 【例】D:\TEMP\AAA フォルダを選択 D:\TEMP\AAA D:\TEMP\AAA\BBB\CCC.txt D:\TEMP\AAA\BBB\DDD\EEE.txt D:\TEMP\AAA\BBB\DDD\FFF.txt GGG.txt が存在する。 まず、フォルダAAAまで選択されたら、 以下の結果がエクセルに出力したいです。 BBB CCC.txt BBB\DDD EEE.txt BBB\DDD FFF.txt GGG.txt うまく伝えないかもしれないですが、ご教授お願いいたします。
- ベストアンサー
- Visual Basic
- VBAでパスを取得した後、分割して取り扱いたい
VBAでパスを取得するとします。 例えば、 A:\BBBB\CCCC\DDDD\EEEE.TXT この時パスを次のように分割をしようとしています。 PATH1=A:\BBBB\CCCC\DDDD\ PATH2=EEEE.TXT といった具合です。 これらの作業をどのようにプログラミングすれば良いのかわかりません。 情けない質問ですが、ご教授お願いします。
- ベストアンサー
- Visual Basic
- 【VBAでapp.path が取得できない】
VBAでapp.path を取得しようとすると、「オブジェクトが必要です」エラーが表示されます。 アプリケーション実行パスを取得する方法はありますか？ Excel2000を使用しています。 宜しくお願いいたします。
- ベストアンサー
- Visual Basic
- VBAのパスの取得について
excelでマクロをVBAで組み、excelが現在置かれているところのパスを取得したのですが たとえばCのaaというファイルのbbところにおいて実行すると変数aに C:\aa\bb を取得することができました。 このパスの最後に\をつけて C:\aa\bb\ にしたいのですがどの書けば変数aに\を追加できるのでしょうか？
- ベストアンサー
- Visual Basic
- エクセルVBAで相対パスでファイルを読み込めない
こんにちは。 標題の通りです。 現在、エクセルのVBAを使用してちょっとしたものを作成しているのですが、 相対パスを使用して他のファイル（DATファイル）を読みこませようとしています。 しかし、どうにもうまくいかなかったのです。 最初は問題なく読み込めていましたが、あるとき突然パスが見つかりませんとの エラーメッセージが出るようになりました。 結局、開いているブックの絶対パスを取得するという方法にして思っている結果 は得られることができましたが、どうにも不思議なので質問しました。 コードは以下のように記述していました。 Open "..\ディレクトリ\ファイル.dat" For Input As #1 上記ではだめなのでしょうか？ VBでは問題なかったような気がします。
- ベストアンサー
- オフィス系ソフト
- 雑誌付録ソフトの使用方法教えてください。
Ｃを勉強しようと「Ｃ MAGAZIN」という雑誌を購入し、付属のＣＤ に入っていたBorland C++ Compiler 5.5.1 というのを使おうと思って インストールしました。 中の「readme.txt」には、以下のようになっています。 -------------------------------------------------------------------------- コマンドラインツールのインストールと実行 1. freecommandlinetools.exe を実行します。無料の C++Builder 5 コマンドラインツール開発システムをインストールしたいドライブと フォルダを選択します。 2. インストール先の bin ディレクトリで次の手順を実行します。 a. 既存のパスに "c:\Borland\Bcc55\bin" を追加します。 b. bcc32.cfg ファイルを作成します。このファイルは，Include および Lib パスのコンパイラオプション(コンパイラの -I および -L スイッチ)を設定するものです。ファイルには次の 行を含めてください。 -I"c:\Borland\Bcc55\include" -L"c:\Borland\Bcc55\lib" c. ilink32.cfg ファイルを作成します。このファイルは，Lib パスのリンカオプションを設定するものです。ファイルには 次の行を含めてください。 -L"c:\Borland\Bcc55\lib" -------------------------------------------------------------------------- 1.まではできたと思います。 2.の意味がわかりません。特にa. 既存のパスとかって何ですか？ ちなみにインストール先は "c:\Borland\Bcc55" で、その中にbinというフォルダはあります。 また、bcc32.cfgといファイルはどのように作成したらいいのですか？そして それはどこに入れればいいのでしょうか？ 素人で申し訳ありませんがよろしくお願いします。 ちなみに僕の使ってるのは普通のwindowsのパソコンです。
- ベストアンサー
- フリーウェア・フリーソフト
- VBAでエクセルからエクセルのファイルを開くには？
D:\に db1.mdb Book1.xls があります。 db1.mdbのフォームのコマンドボタンをクリックして Book1.xlsを開きたいのですが ＶＢＡコードをご教授いただけますか？ （マクロではなくＶＢＡコードが知りたいです） エクセルからエクセルのファイルを開くなら Workbooks.Open ファイルのフルパス で出来ました。 ご回答よろしくお願いします。
- ベストアンサー
- オフィス系ソフト
補足
ありがとうございます。 自分で何とかできっちゃいました。 でも、これは最後の“\”を探して、ファイル名を分割りして、できましたが、 たとえば、先頭から2個目の“\”を探して、ファイル名を分割したい場合、VBAでのやり方を教えていただけますでしょうか？