csvファイルを別のエクセルファイルにコピー貼り付け

Question

大量のデータを処理したいです。
100個のcsvファイルがあります。
一つのcsvファイルには大量のデータが入っており、データの一列目の値が1という場合のみ1の右横の値をコピーし、そのコピーした値を他のエクセルのブックに貼り付けするというプログラムを作りたいのですが作り方がわかりません。
ちなみに1という項目は一つのcsvファイルに一つしかありません。
100個のデータをエクセルファイルに並べたいです。
よろしくお願いします。

Answer 1

どのレベルでわからないのかわからないので何とも言えませんが、

VBA再入門：Excelマクロの基礎を実践で覚える

こちらのサイトが、ほぼ同じテーマのマクロ作成を目標として解説されているので、参考になると思います。愚直に全部やれば、間違いなくご相談のマクロは組めるようになるはずです。

Answer 2

バッチファイルでできちゃいそうな案件ですが、それはさておき、まずは処理を日本語で書き出すところから始めましょう。
順を追って書き出せば何も難しいことはありません。
以下は同一フォルダにCSVファイルが全て格納されており、ファイルの順番は無視した場合の処理の流れです。

1. 他のブックに貼り付ける行番号の変数を1で初期化する
2. CSVファイルを対象にファイル名をひとつ取得する
3. 取得したファイルをオープンする（ブックとしてオープンすると楽なのでその前提で書きます）
4. オープンしたブックの先頭シートを1行ずつ見ていく
5. A列が1なら値を他のブックにコピーし他のブックの行番号をインクリメント→ループを抜ける
6. ブックを閉じる
7. 2から対象ファイルがなくなるまで繰り返し
8. 他のブックを保存する

ざっくり書くとこんな感じかと思います。
わからないところはありますか？って聞くと事細かく聞かれそうなので聞きませんが、まずは一通り作ってみましょう。
そのうえでピンポイントでわからないところを別途質問するとよいでしょう。
今の質問は丸投げなので答えられるのはせいぜいこれくらいです。