ある配下のCSVファイル2個(固定)を読み込み、
コンピュータ名の列が同じ行を比較するというツールを作っています。
考えた結果以下まではできましたが、どうしても指定行を配列に埋め込み処理ができません。
比較方法はわかります。
ですが以下のプログラムでは、CSVの行は複数行あるので最終行しか格納されません。
どのようにしたら、2つのCSVファイルそしてすべての行を配列に入れ込むことができるのでしょうか。
For Each FileName In src.Files
FileEx = fso.GetExtensionName(FileName)
If LCase(FileEx) = "csv" Then
Set CsvFile = fso.OpenTextFile(FileName)
Do Until CsvFile.AtEndOfStream
tmpLine = CsvFile.ReadLine
If roopCnt = 0 Then '1個目のCSV
ArrayA = Split(tmpLine,",")
Else '2個目のCSV
ArrayB = Split(tmpLine,",")
End
rowCnt = rowCnt +1
Loop
roopCnt = 1
End If
Next
No.1ベストアンサー
- 回答日時:
VBScriptなら、配列はpreserveしながらRedimするのが定石かと。
詳しくは、VBScriptリファレンスなどをご覧ください。
参考URL:http://blogs.technet.com/b/heyscriptingguy/archi …
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) 複数のcsvファイルをExcelに一括変換したい 2 2023/03/03 12:44
- Visual Basic(VBA) ファイル全てを .xlsm に変更したところ、プログラムが途中で落ちてしまっています 17 2022/12/07 12:03
- Visual Basic(VBA) 複数csvを横に追加していくマクロについて 2 2023/04/25 09:19
- Excel(エクセル) Excelにて、フォルダ内のTextファイルをマクロで統合すると文字化けしてしまう時の解消コード 4 2023/01/01 07:32
- Visual Basic(VBA) エクセルVBAについて 8 2022/07/13 22:41
- Visual Basic(VBA) フォルダの場所を可変にしたいです(マクロ) 4 2023/05/11 10:00
- Excel(エクセル) PowerQueryに詳しい方教えてください(Office365) 1 2022/07/24 21:11
- Visual Basic(VBA) 【VBA】写真の縦横比を変えずに貼り付ける 5 2023/06/13 11:42
- Visual Basic(VBA) VBAのユーザーフォームのテキストボックスに入力制限をしたい 6 2022/11/15 08:28
- Visual Basic(VBA) マクロVBA 1シートをまとめる 閉じ方 初心者 SOS! 1 2022/06/17 14:54
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
VBA listBoxについて
-
array関数で格納した配列の型を...
-
Excelのセルの色指定をVBAから...
-
ExcelのINDEXとMATCH関数でスピ...
-
表にフィルターをかけ、絞った...
-
Excel VBA 配列の分割について
-
[エクセル]連続する指定範囲か...
-
配列がとびとびである場合の書き方
-
[VBA]改行入りのセルの値を配列...
-
【VBA】ユーザーフォーム リス...
-
二次元配列の中の各行の要素を...
-
エクセルVBAで変数をセルに一行...
-
エクセルでエラーを無視して一...
-
iniファイルのキーと値を取得す...
-
Split関数でLong配列に格納する...
-
VBA 配列に格納した値の平均の...
-
VBAでの100万行以上のデータの...
-
ノーツのデータをVBScriptで取...
-
テーブルを配列に入れて、元の...
-
Excelのオートフィルタで抽出し...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
二次元配列の中の各行の要素を...
-
[エクセル]連続する指定範囲か...
-
ExcelのINDEXとMATCH関数でスピ...
-
Excelのセルの色指定をVBAから...
-
array関数で格納した配列の型を...
-
エクセルで、絶対値の平均を算...
-
配列がとびとびである場合の書き方
-
[VBA]改行入りのセルの値を配列...
-
iniファイルのキーと値を取得す...
-
VBA 配列に格納した値の平均の...
-
Excel オートフィルタのリスト...
-
表にフィルターをかけ、絞った...
-
SUMPRODUCT関数を用いた最小値
-
VB6.0 ファイルの一括読込み
-
エクセルでエラーを無視して一...
-
Dictionaryを使い4つの条件の一...
-
DataSetから、DataTableを取得...
-
【VBA】配列に数式を仕込む方法...
-
Split関数でLong配列に格納する...
-
Excel VBA 配列の分割について
おすすめ情報