- 締切済み
【至急】エクセル2007 マクロについて
【至急】エクセルのマクロについて助けてください。 マクロまったくの初心者です。 既存のマクロを改修しなくてはいけなく助けてください。 やりたいこと 作業用ブック「AXファイル」に元ファイル「BYファイル」のシート3に 編集結果を追加したいです。 (1)元ファイル「BYファイル」にはnシートあり毎回何枚シートがあるか不明 そのシートを作業用ブック「AXファイル」にはシート1枚で表示(3シートを1シートにしたい) (2) 元シートの行(i)の範囲を取得(合計行の前の行まで)※変数を「i」とします。 (3) 元シートの列(j)の範囲を取得(合計行の前の列まで)※変数を「j」とします。 (4) For文を使用して取得した行と列の範囲をセル(I9~最終行の前まで)を見行き 日付の欄に数量が入っていた場合、画像の出力イメージの行を出力結果xlsx.に作成していく。 空白のセルは無視をする。 A12345 10 AAA01 A01 1 1月2日 10 (左からこのようにデータを入れていきたいです) (5)日付の値が12月1日以前の場合「F」それ以外なら「I」をステータスに入れる。 (6) 1枚目のシートの処理が完了したら2枚目以降のシートへ移動し 1枚目のシートの下に対象データを追記していく。 【やりたいイメージロジックコメント】 Workbook open sfilepath_BYファイル 'アップロードファイル(元ファイルを開く) set BYファイル = activeWorkbook ’BYファイルのシート数を数える ’i(行)の範囲を取得 ’j(列)の範囲を取得 ’FOR文を使用し日付行に数量が入っているセル(i9~最下行の前まで)を探し、数量がはいっていたら ’A12345 10 AAA01 A01 1 1月2日 10 F(左からこのように作業用ブック「AXファイル」にデータを入れていきたいです) ’BYファイルの1シート目が最終行まで行ったら次のシートへ移動し同じ処理をする。 わかりにくい表現がありましたらご指摘お願いいたします。 以上、よろしくお願いいたします。 可能でしたら処理コメントがあるとありがたいです。 元ファイルの形式と出力イメージです。
- みんなの回答 (1)
- 専門家の回答
みんなの回答
- aozakana_dha
- ベストアンサー率45% (76/168)