こんにちは
入社2年目で時々仕事でCSVファイルを扱う事がある為、文字化け等無いように下記コードで
C:¥RAD¥CSVというフォルダにあるCSVファイルをExcelへ読み込みたいと思います。
現状では「パスが見つかりません」というエラーが出ている状態です。
※※※の箇所がおかしいとの事ですが、「 path = ThisWorkbook.path & "C:¥RAD¥CSV"」
此方の内容で間違っているという事でしょうか? お手数ですが、ご指摘をお願い致します。
Sub CSVFiles()
Dim path As Variant
Dim fs As Scripting.FileSystemObject
Dim basefolder As Scripting.Folder
Dim mysubfiles As Scripting.Files
Dim mysubfile As Scripting.File
Dim str As String, strs As String, str1 As String
Dim k As String
Dim i As Long
Dim adoSt As Object
Set adoSt = CreateObject("ADODB.Stream")
path = ThisWorkbook.path & "C:¥RAD¥CSV"
Set fs = New Scripting.FileSystemObject
Set basefolder = fs.GetFolder(path) ※※※
Set mysubfiles = basefolder.Files
For Each mysubfile In mysubfiles
If fs.GetExtensionName(mysubfile) = "csv" Then
With adoSt
.CharSet = "UTF-8"
.Open
.LoadFromFile (mysubfile)
str = .ReadText
.Close
End With
MsgBox str
End If
Next
Set fs = Nothing
End Sub
A 回答 (5件)
- 最新から表示
- 回答順に表示
No.3
- 回答日時:
単に、excelから、開く→参照で、そのCSVファイルを指定すればよいです。
RPAを同時に勉強することになっており、手作業ではなくRPAの途中で
マクロを動作させようと思っていました。
ご指摘はごもっともです。
有難うございます。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
関連するカテゴリからQ&Aを探す
おすすめ情報
- ・漫画をレンタルでお得に読める!
- ・人生のプチ美学を教えてください!!
- ・10秒目をつむったら…
- ・あなたの習慣について教えてください!!
- ・牛、豚、鶏、どれか一つ食べられなくなるとしたら?
- ・【大喜利】【投稿~9/18】 おとぎ話『桃太郎』の知られざるエピソード
- ・街中で見かけて「グッときた人」の思い出
- ・「一気に最後まで読んだ」本、教えて下さい!
- ・幼稚園時代「何組」でしたか?
- ・激凹みから立ち直る方法
- ・1つだけ過去を変えられるとしたら?
- ・【あるあるbot連動企画】あるあるbotに投稿したけど採用されなかったあるある募集
- ・【あるあるbot連動企画】フォロワー20万人のアカウントであなたのあるあるを披露してみませんか?
- ・映画のエンドロール観る派?観ない派?
- ・海外旅行から帰ってきたら、まず何を食べる?
- ・誕生日にもらった意外なもの
- ・天使と悪魔選手権
- ・ちょっと先の未来クイズ第2問
- ・【大喜利】【投稿~9/7】 ロボットの住む世界で流行ってる罰ゲームとは?
- ・推しミネラルウォーターはありますか?
- ・都道府県穴埋めゲーム
- ・この人頭いいなと思ったエピソード
- ・準・究極の選択
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
VBAでの共有パスにつきまして
-
エクセルのマクロで特定フォル...
-
VBS パスに変数を入れたい
-
1行単位のデータをテキストファ...
-
EXCEL(VBA)で指定フォルダ内の...
-
Shell関数内で変数を使うことに...
-
実行ファイルのパスを取得したい
-
C++でネットワークパスのファイ...
-
エクセルVBAで複数の変数に、パ...
-
エクセルのファイルオープン時...
-
エクセルマクロでファイル名の...
-
エクセルVBAで一つ上の階層...
-
AccessからExcel最小化
-
Cの関数で自分自身のパス取得
-
C言語でフルパスのファイル読み...
-
VB.NETでのiniファイル読込につ...
-
file://について
-
Eclipse
-
ファイルのアクセス回数について
-
エクセルで複数のコメントのサ...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
エクセルvbaでdocuworksprinter...
-
Excel 相対パス
-
エクセルVBAで一つ上の階層...
-
エクセルのマクロで特定フォル...
-
xcopyコマンドの進行状況を表示...
-
ExcelVBAの使い方 ¥の使い方...
-
EXCEL(VBA)で指定フォルダ内の...
-
【VBA】ExcelマクロでCSVファイ...
-
【VB.NET】App.configにファイ...
-
VBA★PDFをPDFアプリで印刷し...
-
ExcelのVBAで上書き保存を確...
-
VBAでパワーシェルを実行したい...
-
SaveAsの保存先について
-
outlook開けない
-
Eclipse
-
C#でのProcess.Startと変数path
-
開いているファイルを削除し、...
-
A列に記載されているフォルダ...
-
コマンドプロンプトのコピー関...
-
【VBA】複数のtxtファイルから...
おすすめ情報