- ベストアンサー
エクセル 指定列で０値以外の行を別のシートに自動で行全体を抽出
ある列のデータが０値の（空白を含む）とき、それ以外の行を別のシートに自動的に抽出するシートを作成したい。 例 210 0 山田 211 森 212 1 伊藤 213 2 島 ↓ 212 1 伊藤 213 2 島 別のシートに自動的に表示させる
- syunsaku999
- お礼率78% (15/19)
- その他（プログラミング・開発）
- 回答数1
- ありがとう数1
- みんなの回答 （1）
- 専門家の回答
質問者が選んだベストアンサー
（例データ）Sheet1のA1:C8（D列は後刻算出列） （A） （B) （C) （D) 210 0 山田 1 211 森 2 212 1 伊藤 2 213 2 島 2 214 木村 3 215 4 大原 3 216 0 日村 4 217 小原 5 （関数式） D1に=IF(A1="","",COUNTIF($B$1:B1,0)+COUNTBLANK($B$1:B1)) D1の式をD20まで複写。２０は見込み最下行数。 上記D列のようになる。 （関数式）Sheet2で A1に=IF(ROW(A1)>MAX(Sheet1!$D$1:Sheet1!$D$20),"",OFFSET(Sheet1!$A$1,MATCH(ROW(),Sheet1!$D$1:$D$20,0)-1,0)) A2以下A20まで複写。 B1に=IF(ROW(B1)>MAX(Sheet1!$D$1:Sheet1!$D$20),"",OFFSET(Sheet1!$A$1,MATCH(ROW(),Sheet1!$D$1:$D$20,0)-1,1)) B2以下にB20まで複写する。 C1に=IF(ROW(C1)>MAX(Sheet1!$D$1:Sheet1!$D$20),"",OFFSET(Sheet1!$A$1,MATCH(ROW(),Sheet1!$D$1:$D$20,0)-1,2)) C2以下にC20まで複写する。 （結果） 210 0 山田 211 0 森 214 0 木村 216 0 日村 217 0 小原
お礼
ありがとう御座いました。まだまだ、初心者なので頑張ります。