Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちらをご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

55235 / 76732

←次へ　｜　前へ→


	【26275】フォルダ内にあるファイルの数をカウント...

ペンギン - 05/6/30(木) 11:37 -


	引用なし

	パスワード

各ファイルに、同じ検査データがあります。ファイルは各月ごとになっています。この各月ごとのデータを集計し、一つの表を作成したいのです。データを集計し、表を作成するマクロは出来たのですが、これをどのようにループして、横展開していけばいいのでしょうか？表は、 No.　　　　大項目　　　　TOTAL　　　　2005/03　2005/04 　　　　BUS 　　　　0　　　　0 というフォーマットで作ります。私が考えのは、 Yは行番号を示しています。ｎはフォルダ内のファイルの数。 For Y=0 To n Step 1 　　･･･　　myDate = Left(Range("A2"), 7) 　　A = WorksheetFunction.CountIf(Columns(16), "=*BUS*") 　　･･･ ThisWorkbook.Activate 　　Cells(2, 5 + Y) = myDate 　　Cells(3, 5 + Y) = A 　　･･･ Next　Y でも、ｎにいれるフォルダ内のファイルの数をどうやって取得したらいいのかわからなくて、つまづきました。どなたか、ご教授ください。よろしくお願いいたします。