Excel VBA質問箱 IV

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

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

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
1584 / 13657 ﾂﾘｰ ←次へ　｜　前へ→
▼ 【73434】並び替え後に別シートにコピー とまりんこ 13/1/10(木) 10:14 質問[未読]
【73435】Re:並び替え後に別シートにコピー UO3 13/1/10(木) 11:03 発言[未読]
【73434】並び替え後に別シートにコピー
質問  とまりんこ  - 13/1/10(木) 10:14 -
引用なし
パスワード
   Excel上で以下のようなデータがあります。
C列をキーとして並び替えがされているデータです。
やりたいことはC列を元にして、0のデータは0だけを新しいシートに
1のデータは1だけを新しいシートに、2のデータは2だけを新しいシートに
自動的にコピーしたいのです。

C列で表示されてくるデータは毎回同じものとは限りません。

どなたかをお知恵をお貸しください。

A　　 B　　　C
1 　　あ 　　0
2 　　い 　　0
3 　　う 　　1
4 　　え 　　1
5 　　か 　　2
6 　　あ 　　2
7 　　い 　　3
8 　　う 　　3
・ 　・ 　　・
・ 　・ 　　・
・ 　・ 　　・
【73435】Re:並び替え後に別シートにコピー
発言  UO3  - 13/1/10(木) 11:03 -
引用なし
パスワード
   ▼とまりんこ さん：

▼とまりんこ さん：

こんにちは
コードから離れて、この種の処理では、１行目をタイトル行にした上で
フィルターオプションでの絞り込みと転記がおすすめです。
（オートフィルター利用も考えられますが、抽出すべき 0,1,2・・・等の値と数が可変ならやっかいです）

・まず、Ｃ列から重複を排除した一意の値リストを作業域に抽出します。
・その抽出された値、１つずつを検索キーとして与え、別シートに抽出します。

まず、このあたりを操作でやってみられませんか？
で、それをマクロ記録しますとコードができあがります。
あとは、一意のリストから１つずつ取り出して抽出処理をループさせるといった
チューニングを行えばよろしいかと。
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
1584 / 13657 ﾂﾘｰ ←次へ　｜　前へ→
ページ：  ┃  記事番号：
2610219
(SS)C-BOARD v3.8 is Free