[[20041101133236]]　『シートの内容を別シートに特定行だけ振り分ける』（ハルオ）　ページの最後に飛ぶ

『シートの内容を別シートに特定行だけ振り分ける』（ハルオ）

 はじめまして。下記の作成方法につまづいています。

 sheet1
 1 aaa bad
 2 bbb good
 3 ccc both
 4 ddd bad
 5 eee good

 のsheet1をマスターデータと使用し、
 列3の値で、sheet2、sheet3に下記のように作りたいです。

 sheet2（goodとboth）
 2 bbb
 3 ccc
 5 eee

 sheet3（badとboth）
 1 aaa
 3 ccc
 4 ddd

 sheet2、sheet3に引用した際、空白行ができないような作りにしたいのです。
 どうかお願いします。

 規則性がさっぱり分からない・・・(*_*)
 HNもひどいよ・・・何て呼べばいいの？
  (INA)

 非常にごめんなさい！細かくお願いするべきでした。
 上記を変更付加いたしました、よろしくお願いします！
 （ハルオ）

 オートフィルターで抽出して、コピー＆貼り付け
 をマクロの記録しては如何でしょうか？

  (INA)

 コピー＆貼り付けの簡潔でもよいのですが、たとえば

 sheet1
 1 aaa bad
 2 bbb good
 3 ccc both
 4 ddd bad
 5 eee good

 内の

 3 ccc both
 ↓
 3 zzz both

 と変更した際、sheet2、sheet3にも反映するようにしたいのです。

 数式なら、Sheet2のA1に
=IF(SUMPRODUCT((Sheet1!$C$1:$C$5="good")+(Sheet1!$C$1:$C$5="both"))<ROW(A1),"",INDEX(Sheet1!$A$1:$B$5,SMALL(IF(Sheet1!$C$1:$C$5="good",ROW($A$1:$A$5),IF(Sheet1!$C$1:$C$5="both",ROW($A$1:$A$5))),ROW(A1)),COLUMN(A1)))
でCtrl+Shift+Enterで配列数式にします。
後は必要範囲にコピーします。参照範囲はご自分のレイアウトに変更して下さい。
INAさんは
＞をマクロの記録しては如何でしょうか？
と申しています。
マクロならチェンジイベントを使ったら如何ですか？
（ケン）

 ちょっと試してみますね
 （ハルオ）

コメント返信：

[ 一覧(最新更新順) ]

[[20041101133236]] 『シートの内容を別シートに特定行だけ振り分ける』（ハルオ） ページの最後に飛ぶ

[[20041101133236]]　『シートの内容を別シートに特定行だけ振り分ける』（ハルオ）　ページの最後に飛ぶ