都度、対象CSVを指定できるようにして、処理するマクロを作りました。
その中で、以下の方法でCSVを選択できるようにしています。
MsgBox "ファイルを指定してください。 "
Path = CurDir & "\"
Target = Application.GetOpenFilename("テキスト ファイル,*.csv", Title:="ファイルを指定してください")
ただし、Targetにはフルパスを含めたファイル名が代入されてしまいます。
Targetからファイル名のみを取り出すにはどうしたら良いでしょうか?
例えばFilenameみたいな変数に「〇〇〇〇.csv」の様にファイル名だけ入ると助かります。
No.3
- 回答日時:
こんにちは
FSO、Dir関数はすでに回答にあるので
文字列操作の場合
fname = Right(Target, InStr(StrReverse(Target), "\") - 1)
No.1
- 回答日時:
ありがとうございます。
ご案内いただいたサイトから出来ました。
fsoの場合、VBAのツール→参照設定を操作しないといけないのがちょっと難点ですね。(マクロを使う人にも設定させないといけない。)
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) 複数のcsvファイルをExcelに一括変換したい 2 2023/03/03 12:44
- Access(アクセス) CSVファイルの「0落ち」にVBA 6 2023/02/02 15:27
- Visual Basic(VBA) VBAで特定の場所にあるCSVファイル(複数)から特定場所を抜き出してExcelに転記したいです。 11 2023/05/23 16:29
- Access(アクセス) access,vbaでフォルダ内のファイルをテーブルにインポート、ファイル名もフィールドに追加したい 1 2022/08/31 11:11
- Excel(エクセル) Excel VBAどこが間違ってますか? 4 2023/07/17 10:04
- Excel(エクセル) エクセルのVBAについて とあるサイトのコードを参考に、CSVの文字化けを直すVBAを作成しているの 7 2022/11/04 14:15
- Visual Basic(VBA) エクセルVBA 4 2022/05/14 00:51
- Visual Basic(VBA) 動かなくなってしまった古いVBAを動くようにしたい 8 2022/09/20 13:57
- Visual Basic(VBA) 集めたシートのシート名を変更したい。 下記のコードでサブフォルダにあるファイルのSheet3を集めて 6 2022/08/23 10:38
- Visual Basic(VBA) エクセルのマクロについて教えてください。 4 2023/07/03 09:11
このQ&Aを見た人はこんなQ&Aも見ています
-
風水の観点で選ぶ観葉植物とは?置き場所や上げたい運気ごとの注意点を紹介!
観葉植物で運気をアップするコツを、風水デザイン1級建築士の福島昌彦さんに伺った。
-
【エクセル マクロ】読み込んだcsvファイルの名前を別名保存のファイル名に使いたい
Visual Basic(VBA)
-
【EXCEL】【VBA】空欄は飛ばして処理する方法を教えて下さい。
Excel(エクセル)
-
取り込むファイルのファイル名をセルに返したい
Visual Basic(VBA)
-
-
4
エクセル:マクロ「Application.CutCopyMode = False」って?
Excel(エクセル)
-
5
【Excel VBA】CSV取込時、数字の先頭の0を消えないようにするには?
Excel(エクセル)
-
6
エクセルVBAでセルに入力したパスでブックを開く
Excel(エクセル)
-
7
VBAマクロ実行時エラーの修正について
Visual Basic(VBA)
-
8
VBAでファイルを開くときにファイル名でワイルドカードを使用したいです
その他(プログラミング・Web制作)
-
9
メッセージボックスのOKボタンをVBAでクリックさせたい
Visual Basic(VBA)
-
10
ExcelVBAを使って、値がある場合は作業を繰り返し実行するプログラムを作成したい。
Visual Basic(VBA)
-
11
名前をつけて保存した後、元のファイルに戻るには
その他(コンピューター・テクノロジー)
-
12
マクロを使ってフォルダー内にあるtxtデータをエクセルにデータに変換する方法をご教授願います
Excel(エクセル)
-
13
別のシートから値を取得するとき
Visual Basic(VBA)
-
14
EXCEL VBA セルに既に入力されている文字に文字を追加する
Excel(エクセル)
-
15
VBAで任意のファイルを読み出して貼り付けたい
Excel(エクセル)
-
16
【ExcelVBA】ファイル名をセルに入れるには?
Visual Basic(VBA)
-
17
【Excel VBA】指定行以降をクリアするには?
Visual Basic(VBA)
-
18
【VBA】テキストファイルから特定の文字列を抽出して、エクセルに出力する
Excel(エクセル)
-
19
Excel VBAでフォルダ内の全テキストファイルの任意データを取得について
Visual Basic(VBA)
-
20
VBA フォルダ名と画像ファイル名取得
Visual Basic(VBA)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
0バイトのテキストファイル
-
【Excel VBA】取り込んだファイ...
-
Eclipseで検索ができなくなった
-
リソースファイルを認識してく...
-
VBAで、JPG写真の撮影日時を読...
-
ファイルのダウンロードが遅い
-
openglで音楽を再生する
-
MusicXMLファイル作り方教えて...
-
JSPの代わりにHTMLじゃだめですか?
-
EUCコードをSHIFT-JISに変換したい
-
C# ファイルサイズの取得(ファ...
-
VBS ファイルマージ処理
-
サイトマップにサブドメインを...
-
アスキーコードまたはエスケー...
-
C++.NET 2003 「空のドキュメ...
-
J2EE1.3の頃のチュートリアルの...
-
C#について質問【複数の.datフ...
-
main関数のコマンドライン引数...
-
「Active X Inet」と「WinInet...
-
MFC SDIアプリで開いているファ...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
【Excel VBA】取り込んだファイ...
-
0バイトのテキストファイル
-
VBAで、JPG写真の撮影日時を読...
-
HTMLテキストリンクでExcelファ...
-
Eclipseで検索ができなくなった
-
【VBA】複数CSVの特定範囲を1つ...
-
2GB以上のファイルを扱う方法
-
C++によるファイル送受信プログ...
-
VB6.0のメモリリークについて
-
vbaの構文の修正相談(xmlファ...
-
サイトマップにサブドメインを...
-
BASP21のファイルアップロード...
-
ディレクトリのサイズの取得
-
main関数のコマンドライン引数...
-
ファイル更新日取得
-
msgget()で指定するkey値について
-
<input type="file" で初期値...
-
C++.NET 2003 「空のドキュメ...
-
Indy FTP サーバー上のファイル...
-
RPGでメッセージファイル利用
おすすめ情報