No.4
- 回答日時:
>ファイルと
ブックのことをイメージしているらしいが、あいまいです。
現在のフォルダは、CurDir でどうですか。
下記はFSOを使っています。フォルダの中には、エクセル以外のファイルも入っていることもあり、エクセルを越えた立場から考えると
適当かと思い上げます。
ーー
Sub test01()
MsgBox CurDir
Dim fso
Set fso = CreateObject("Scripting.FileSystemObject")
' Set f1 = fso.CreateTextFile(CurDir & "\" & "text1.txt", True)
Set f = fso.opentextfile(CurDir & "\" & "test.txt")
b = f.ReadAll
MsgBox b
Set f = Nothing
Set fso = Nothing
End Sub
ーー
ファイル名の表示は
Sub test02()
MsgBox CurDir
Dim fso
Dim fol
Dim fil
Set fso = CreateObject("Scripting.FileSystemObject")
Set fol = fso.GetFolder(CurDir)
Set fil = fol.Files
For Each f In fil
MsgBox f.Name
Next
set fi l= Nothing
Set fol = Nothing
Set fso = Nothing
End Sub
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) エクセルのマクロについて教えてください 物件ごとのフォルダを作成してます そのフォルダ内にサブフォル 2 2023/07/02 17:58
- Visual Basic(VBA) エクセルのマクロについて教えてください。 1 2023/08/08 11:02
- Visual Basic(VBA) エクセルのマクロについて教えてください マクロを実行すると メッセージボックスが表示されて okをク 4 2023/07/05 19:32
- Excel(エクセル) 【マクロ】フォルダAからダBへファイルを、ファイルの更新日時の条件で、1つづつ移動するには? 3 2022/08/25 09:56
- Visual Basic(VBA) エクセルのマクロについて教えてください。 4 2023/07/03 09:11
- Excel(エクセル) エクセルのマクロについて教えてください。 1 2023/02/21 09:28
- Excel(エクセル) エクセルのマクロについて教えてください。 1 2022/10/26 17:14
- Visual Basic(VBA) エクセルのマクロについて教えてください。 1 2023/02/21 11:19
- Excel(エクセル) エクセルのマクロについて教えてください。 2 2023/02/21 13:29
- Visual Basic(VBA) エクセルのマクロについて教えてください。 2 2023/02/07 09:58
このQ&Aを見た人はこんなQ&Aも見ています
-
「環境が人を育てる」って本当?環境によって人格や生き方は本当に変わるのか
環境が人生に与える影響は実際どれほどのものなのか、専門家の田宮由美さんに伺った。
-
Excel VBAで同じフォルダ内のファイルを開くには?
Excel(エクセル)
-
VBAで同一フォルダにあるブックを全て開く
Access(アクセス)
-
同一フォルダ内の別ブックからシートをコピーするには? 「集計」フォルダ内に「項目別集計.xlms」と
Visual Basic(VBA)
-
-
4
EXcelのマクロで相対パスでファイルを開く
その他(Microsoft Office)
-
5
VBAでファイルを開くときにファイル名でワイルドカードを使用したいです
その他(プログラミング・Web制作)
-
6
ExcelVBAでBookを開く時にファイル名の一部だけを指定で
Access(アクセス)
-
7
VBAで保存しないで閉じると空のBookが残る
Excel(エクセル)
-
8
ワイルドカード「*」を使うとうまくいかないマクロの添削をお願いします
Visual Basic(VBA)
-
9
エクセルマクロで同じフォルダ内のテキストファイルをメモ帳で開く方法
Excel(エクセル)
-
10
EXCEL VBA 指定したファイルが存在しない場合メッセージボックスを表示させる
Access(アクセス)
-
11
エクセルマクロで不特定なファイル名を使用するには
Excel(エクセル)
-
12
名前をつけて保存した後、元のファイルに戻るには
その他(コンピューター・テクノロジー)
-
13
エクセル マクロ 最終列までを全選択
Excel(エクセル)
-
14
エクセルVBAで、値が入っている最終行の、右隣の値をコピーして、別のセルに貼り付けるコード
Excel(エクセル)
-
15
VBA 数値を文字列として貼付したい
Excel(エクセル)
-
16
エクセルVBA Ifでシート名が合致したら別ファイルから転記する場合のElse IfとForの書き方
Visual Basic(VBA)
-
17
【VBA】マクロの入ったファイルと同じフォルダに,出力したファイルを保存するコードについて
Visual Basic(VBA)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
VBAで保存しないで閉じると空の...
-
【Excel VBA】マクロでExcel自...
-
エクセル関数>参照ファイル名...
-
エクセル;相対パスを絶対パスへ...
-
エクセルVBA 個人用マクロブッ...
-
excelで直前に参照していたブッ...
-
【Excel】マクロの保存先について
-
マクロの保存先、開いてるすべ...
-
エクセルのvbaにて thisworkboo...
-
EXcelのマクロで相対パスでファ...
-
同一フォルダ内のファイルを開く
-
EXCELブックが勝手に開いて困っ...
-
EXCELマクロで、開いてはいるが...
-
エクセル タスクスケジューラ...
-
[フィルターオプションの設定]...
-
エクセルで複数のファイル(ブッ...
-
複数のExcelファイルの印刷設定...
-
エクセルで未保存に対するメッ...
-
エクセルVBAで作成した別ブック...
-
【Excel】特定セルの内容をテキ...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
VBAで保存しないで閉じると空の...
-
エクセル関数>参照ファイル名...
-
【Excel VBA】マクロでExcel自...
-
マクロの保存先、開いてるすべ...
-
エクセル;相対パスを絶対パスへ...
-
【Excel】マクロの保存先について
-
excelで直前に参照していたブッ...
-
EXcelのマクロで相対パスでファ...
-
複数のExcelファイルの印刷設定...
-
エクセルVBAで作成した別ブック...
-
エクセルのvbaにて thisworkboo...
-
[フィルターオプションの設定]...
-
個人用マクロブックが消えました
-
エクセルVBA 個人用マクロブッ...
-
EXCELブックが勝手に開いて困っ...
-
【Excel】特定セルの内容をテキ...
-
エクセルで未保存に対するメッ...
-
ファイル名変更後も、マクロを...
-
EXCELのボタンによるマクロの登...
-
名前の変わるブックをアクティ...
おすすめ情報