|
大量に同じ処理を行わなければならないのですが、
どのようにVBAを書けばよいのか分かりません。
お手数をおかけしますが、ご教授いただけますと幸いです。
Sheet1に下記のように6列(A〜F列、H〜M列)をひとまとまりとし、
1列空けて、次の行からまた同じヘッダーのデータが入っています。
A列 B列 C列 D列 E列 F列 G列 H列 I列 J列 K列 L列 M列 …
------------------------------------------------------------------------------
日付 クラス 名前 性別 得点 順位 <空白> 日付 クラス 名前 性別 得点 順位 …
------------------------------------------------------------------------------
1/5 A ●● 女 57 1/6 C △△ 男 78
1/9 B □□ 男 90 1/17 A ×× 男 95
各まとまりごとに日付(昇順)、得点(降順)でソートした後、
順位列に日付毎の順位を入力し、オートフィルタで各日の順位が1〜3のデータを
Sheet2に張り付けるということを、繰り返したく思います。
また、Sheet1の列は今後増える可能性があるため、最終列を自動で取得したいです。
他のサイトなども見ながら奮闘中ですが
納期まで時間がなく困っております。お知恵をいただけますと幸いです。
|
|